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ISO DESCRIPTION 

121 

1 33 



129 



THIS DIAGNOSTIC i4AS DESIGNED TO TEST RS03 AND RSOM DRIVES. 



123 1. ABSTRACT 

I2fc 

THIS IS A BASIC FUNCTION DIAGNOSTIC WHICH IS USED TO VERIFY THAT THE 
(RHil) CONTROLLER AND THE (RS03 OR ftSOH) DISKS ARE OPERATING 
39 CORRECTLY. THIS IS NOT A RELIABILITY DIAGNOSTIC AND THEREFORE SHOULD 

IT. NOT BE USED AS ONE. THIS PROGRAM CAN TEST UP TO 8 DRIVES. THE DRIVES 

.'n CAN BE INTERNtXEO AND IN ANY ORDER. 

'a: IF THE OPERATOR WOULD LIKE TO CHECK THE DISK REGISTERS PRIOR TO 

ENTERING THIS DIAGNOSTIC. THERE ARE SOrC ROUTINES IN THE BACK OF THE 
.3S DIAGNOSTIC WHICH CAN 7^ USED. THESE ROUTINES WILL ALlOU THE OPERATOR 

13fe TO LOAD THE REGISTEI^S THROUGH THE SWITCHES. PLEASE REFERENCE THE 

127 STARTING ADDRESSES THAT Wia TEST THE REGISTERS YOU DESIRE. 

13a 

140 

IHl 2. REQUIREMENTS 

iH? 
143 
144 

.'45 2.1 EQUIPMENT 

146 

147 POPll STANDARD COMPUTER WITH A MINIMUM OK 8K OF MEMORY, AND AN RHil 

148 CONTROLLER WITH A RSQ3 OR RS04 DISK. 

ISO 
151 

152 2.3 PRELIMINARY PROGRAMS 

153 

154 NONE 

155 

I5b 

157 

158 3. LOADING PROCEDURE 

159 

IbO USE STANDARD PROCEDURE FOR ABS TAPES. 

l&l 

152 

1&3 

1&4 4. STARTING PR0CEDL7<£ 

1&5 

Ibb 

lfc7 

168 4.1 CONTROL SWITCH SETTINGS 

1&9 

170 SEE 5.1.1 (ALL DOWN FOR WORST CASE TESTING) 

171 

172 

173 

174 4.2 STARTING ADDRESS 
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DESCRIPTION 



177 
178 

17<3 H.3 PROGRAM AND/OR OPERATOR ACTION 



LOAD PROGRAH INTO NEHORY USING ABS LOADER. 



180 

ii^ 

163 1. STARTING ADDRESS 200. 

184 

III A. ^gl^lj^S (SEE SEC 5.1.1) 9LL OOUN FOR UORST CASE 

187 C* THE PROGRAN'uILL LOOP AND BELL UIU RING ONCE EVERY PASS 

192 

193 2. STARTING AQORESSES FOR TESTING T« RH11-RS03/0H REGISTERS 

19M USING THE ailTCH REGISTER. 

195 

1% A. 250 MORD.COUHT REGISTER TEST 

197 B. 25H as ADORES TKT 

196 C. Ho DISK (VORSS KG. TEST 

199 D. 26H DRIVE §TATl«REG. TEST 

200 E. 270 ERROR %6.^T 

201 F. 27H LOOK flICAD REG. TEST 

m S: 18$ «e. TEST 

204 I. 310 fWINTENANCEREG. TEST 

205 3. 314 RSCSi REG TEST 

2Qb 
207 

209 5. OPERATIONAL SUITCH SETTINGS 

211 SUITCH SETTINGS ARE: 

212 

213 SU<15> = I HALT ON OROR 

214 SU<14> si LOOP ON T&T 

215 aj<13> s 1 INHIBIT TYPEOUTS 

21b Si<ll> s 1 INHIBIT ITERATIOI 



ITERATIONS OF SUBTEST 



217 SU<10> s ^ eiU ON 



218 0 BELL ON PASS CONPLETE 

219 SU<09> si LOOP ON ERROR 

220 SU<OB> si LOOP ON TEST IN SU<7:0> 

221 

222 
223 

224 5.2 SUBROUTINE ABSTRACTS 

225 
22b 
227 

228 5.2.1 SCOPE 

229 

230 THIS SUBROUTINE CALL IS PLACED BETWEEN EACH SUBTEST IN THE INSTRUCTION 
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531 SECTION. IT RECORDS THE STARTING RDDRESS OF EACH SUBTEST AS IT IS 

c32 BEING ENTERED IN LOCATION "LAD". IF A SCOPE LOOP IS RE0UE5TED, THE 
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234 DESCRIPTION 
235 

1$ CURRENT SUBTEST WILL BE LOOPED UPON. 5W<J1> ON A 1 INHIBITS ITERATION 

238 OF SUBTESTS. THE CONTENTS OF LAD NAY BE USED TO DETERMINE THE LAST 

239 SUBTEST SUCCESSFULLY COMPLETED. 
240 

241 
242 

243 5.2.2 HLT 

IhS THIS ROUTINE PRINTS OUT AN ERROR MESSAGE (SEE b.l). TO INHIBIT 

24b TYPEOUTS, PUT SU<13> ON A 1. 

247 

248 

249 

250 5.2.3 TRAPCATCHER 

?51 

252 A -.♦2- - -HALT" SEQUENCE IS REPEATED FROM 0 - 77b TO CATCH ANY 

253 UNEXPECTED TRAPS. THUS ANY UNEXPECTED TRAPS OR INTERUPTS WILL HALT AT 

254 THE VECTOR ♦ 2. 

255 
25b 
257 

258 b. ERRORS 

259 
2bO 
2&I 

262 b.l ERROR PRINTOUT 

263 

2b4 THE FORMAT IS AS FOaOUS: 

2S5 

2bb ADR CSi = CS2 = ER = 

267 GOOD s BAD s 

268 

2b9 WHERE: 

§71 CS1.CS2,ER ETC. s RSll DISK REGISTERS. 

272 GOOT = EXPECTED DATA. 

273 BAD s DATA RECEIVED. 

§75 TO FIND THE FAILING TEST, LOOK AT THE LISTING ABOVE THE ADDRESS TYPED. 

27b 

277 
278 

279 b.2 ERROR RECOVERY 

280 

281 RESTART AT 200 

282 

283 

284 

285 7. RESTRICTIONS 

286 

287 NONE 
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289 DESCRIPTION 

290 
291 

292 8. MISCELLANEOUS 

293 

294 

295 

2% 8.1 EXECUTION TIflE 

298 A BELL WILL RING WITHIN 1 HINUTE WITH ALL SWITCHES DOWN. 

299 
300 
301 

302 B.S STACK POINTER 

303 

304 STACK IS INI TALLY SET TO 500 

305 

30E> 

307 

308 9. WRITE LOCK TEST 

309 

310 THE WRITE LOCK TEST REQUIRES OPERATOR INTERVENTION. THE STARTING 

311 ADDRESS FOR THIS TEST IS 220. THE PROGRAN WILL TELL THE OPERATOR 

312 WHICH SWITCHES HAVE TO BE SET. 
313 

314 
315 

316 10. TEST DESCRIPTION 



317 

318 1. TEST RSCS2 

319 



CLEAR ALL READ/WRITE BITS AND 
CHECK. NOW CLEAR AND RECHECK. 



AND CHECK. SET ALL R/W BITS AND 



321 
322 

323 2. TEST FOR ONLINE DRIVES 
324 

325 PT ERROR BITS IN RSER. THIS CAUSES ATTENTION SUHNARY BITS 

326 TO SET IN RSAS. 00 FOR ALL DRIVES. RSAS HAS NOT YET BEEN 

327 TESTED. SO IN THE CASE OF NO BITS IN RSAS SETTING, DRIVE 0 

328 IS TESTED. 

330 3. RESET TEST FOR REGISTERS 

332 SET ALL R/W BITS IN RSCSl, RSCS2, RSBA. RSOA, RSER. R5WC. 

333 RSDB. AND RSMR. 00 A RESET AND TEST ALL R/W Bits TO BE 

334 CLEANED. 
335 

336 4. SET AND CLEAR ALL REGISTERS 
337 

338 SET ALL R/W BITS IN RSCSl. RSCS2. RSBA. RSDA. RSER, RSWC. 

339 RSDB AND RSMR AND TEST. SET ALTERNATE BITS ANO CHECK TO MAKE 

340 SURE BITS ARE NOT TIED TOGETHER. NOW SET ALL BITS AND CLEAR 

341 THEM TO MAKE SURE ALL CAN BE CLEARED ONCE SET. 

343 5. RANDOM NUMBER TEST FOR RSWC AND RSDA 
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345 THIS TEST GENERATES RANDOM NUNBERS AND LOADS THEn INTO RSUC, 
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347 DESCRIPTION 

348 

3S0 RSDA AND RSBA. 

3I2 6. TEST "CLEAR BIT" IN RSCS2 

3|m SET ALL R/U BITS IN RSCSl, RSCS2, RSBA. RSDA, RSER. RSUC 

355 RSDB, AND RSNR. SET cLeAR BIT IN RSC&2. NO^ TEST k.L R/U 
3Sh BITS FOR Q IN ALL THE ABOVE REGISTERS. 

357 

356 7. LOAD RSDB UITH ALL ONES AND ALL ZEROS 

3I0 LOAD RSDB UITH A UORD OF ZEROS AND A UORD OF ONES. UAIT FOR 

361 "OR" TO SET AND THEN CHECK OUTPUT OF SILO. IF OR DID NOT SET 

362 ERROR NESSAGE APPEARS. 

3bM 8. TEST NO-OP FUNCTION 

3bf THE NO-OP FUNCTION IS TESTED UITH AND UITHOUT ERROR BITS SET. 

3b7 ALL THE REGISTERS ARE CHECKED AFTER BOTH CASES. 

3bS S. TEST DRIVE CLEAR FUNCTION 

371 FIRST SET ALL R/U BITS IN RSDA, RSUC. RSER. AND RSNR. DO A 

372 DRIVE CLEAR FUNCTION. NOU TEST kl REGISTERS FOR CORRECT 

373 DATA. 

3^ 10. EXECUTE A ONE UORD URITE FUNCTION 

377 SET RSUC TO -1. NOV -1 INTO OUTBUF. LOAD RSBA UITH OUTBUF. 

378 DO A URITE TEST RDY BIT FOR 0 THEN UAIT FOR IT TO SET. TINE 
37? OUT TO ERROR IF RDY BIT DOESN'T SET AND CHECK FOR ERROR 

380 CONDITIONS. TEST RSDA FOR CORRECT ADDRESS. TEST UORD COUNT 

381 FOR 0. 
382 

383 11. EXECUTE A ONE UORD URITE CHECK 
364 

385 SET UP RSDA, RSBA. RSUC AND OUTBUF AS IN THE URITE FUNCTION 

38b TEST. DO A URItE CHECK FUNCTION. TEST RDY AS DONE IN THE 

387 URITE TEST. CHECK FOR URITE CHECK ERROR. THEN TEST RSDA, 

338 RSUC AND RSBA FOR CORRECT DATA. 
369 

390 12. TEST READ FUNCTION 
391 

392 SETUP RSDA. RSBA, RSUC AND OUTBUF AS IN THE URITE FUNCTION DO 

393 A READ FUNCTION. TEST RDY BIT AS DONE IN^THE W I TE FUNCTION. 

394 TEST FOR ERRORS. ALSO TEST RSDA, RSUC AND RSBA FOR CORRECT 

395 DATA. 
3% 

397 13. TEST BLOCK SEARCH FUNCTION, PIP AND DRY BITS AND ADDR. CONF. 

398 BIT 
399 

400 DO fl BLOCK SEARCH FOR SECTOR 32. LOOP ON ADDR. CONF. BIT IN 

401 RSNR. IF IT DOESN'T SET, TIMEOUT. UHEN YOU GET THERE DO A 
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403 ^5T FOR DRY ANC PIP 3ITS BEFORE FINDING SECTOR C. FOR PIP 
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405 DESCRIPTION 

40b 

uS SHOULD SET AND DRY SHOULD CLEAR BEFORE FINDING SECTOR^^O. 

4^ ONCE SECTOR 0 IS FOUND PIP SHOULD CLEAR AND DRY SHOULD SET. 

410 IF DRY DOES NOT SET A TIME OUT ERROR WILL OCCUR^ INDICATING 
4ti SECTOR 0 MAS NOT FOUND. SC IN RSCSl SHOULD ALSO SET. RSBA 

412 AND RSWC SHOULD NOT MOVE, THIS IS ALSO TESTED. 

414 14. ILLEGAL FUNCTION CODE TEST 

41b IN THIS TEST RSBA, RSWC AND RSDA ARE SET UP AS IF TO DO A 

?I7 LEGAL FUNCTION. AN ILLEGAL FUNCTION IS THEN EXECUTED. THE 

4 IB PROGRAM TEST FOR ILF ANO ERR BITS TO SET. RSBA. RSWC„ AND 

4i§ RSDA ARE ALSO TESTED FOR CORRECT DATA. THIS IS ClONE FOR ALL 

420 THE ILLEGAL FUNCTIONS. 
421 

422 FOR AN AID IN TROUBLE SHOOTING THE ILLEGAL FUNCTION CODE CAN 

423 BE LOADED INTO LOCATION ILLTAB OR ILFTB2, DEPENDING ON WHICH 

424 ILLEGAL FUNCTION TEST YOU WISH TO LOOP ON. IN THE^NEXT 

415 LOCATION. FOLLOWING THE ILLEGAL FUNCTION, A 0 MUST BE LOADED. 
42b NOW BY SETTING SWITCH IH (LOOP ON TEST), YOU WILL LOOP ON THE 
427 ILLEGAL FUNCTION. 

421 15. TEST PAR IN RSER 

430 

431 SET PAR IN RSER AND CHECK. ALSO TEST ERR IN RSDS TO SET 

432 BECAUSE OF THE PAR SETTING. 

434 lb. TEST DPR ANO MOL IN RSDS 

BOTH THESE BITS SHOULD BE SET IN RSDS IF THE DRIVE IS ON LINE 

437 AND UP TO SPEED. 

438 

43? 17. LOOK AHEAD TEST 
440 

441 FIRST CHECK TO SEE IF SECTOR FRACTION BITS ARE MOVING. NOW 

442 SET RSDA TO 0 Af€ INCREMENT IT EVERY TIME THE ADDR.CONF BIT 

443 SETS. IF THE ADDR.CONF BIT DOES NOT SET IN A CERTAIN LENGTH 

444 OF TIME, A TINE OUT ERROR OCCURS. 

44b IB. PARITY TEST 
447 

44B THIS WILL TEST THE PARITY LOGIC ONLY IF THERE IS^ PARITY 

449 MEMORY ON THE SYSTEM IN LESS THAN^28K. IT WILL WRITE BAD 

450 PARITY IN A MEMORY LOCATION THEN TRY^ P DO^ HSIIL ILrl^ 

411 DRIVE FROM THAT LOCATION. THIS SHOULD CAUSE A PARITY ERROR. 

413 19. TEST WRITE CHECK ERROR 

4^4 

455 IN THIS TEST THE PROGRAM WRITES A -1 ON TO THE DISK. A 0 IS 

45b NOW FLOATED THROUGH THE WORD IN THE BUS ADDRESS LOCATION. AND 

457 A WRITE CHECK FUNCTION IS DONE. THE WCE BIT IN RSCS2 SAOULD 

459 SET AND SHOULD CAUSE THE TRE BIT IN RSCSl TO SET. THESE BITS 

459 ARE THEN CLEARED. A WORD OF 0 IS NOW WRITTEN ON THE DISK AND 
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H i IS FLOATED THROUGH THE WORD IN THE BUS ADDRESS ftNO THE 
%1 HRITE CHECK FUNCTION TEST 15 REPEATED. 
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^ DESCRIPTION 

4| 20. TEST PROGRAH ERROR BIT IN RSCS2 

%e HERE THE PROGRAH ATTEMPTS TO INITIATE A DATA TRANSFER 

Hfel OPERATION mWILE THE CONTROL IS CURRENTLY PERFORfllNG OfC. 

47: THIS SHOULD CAUSE PGE TO SET WHICH SHOULD CAUSE TRE TO SET. 

srI THESE BITS ARE THEN CLEARED. RSWC IS ALSO TESTED FOP IT 

472 SHOULD NOT BE 0 FOR THE CURRENT OPERATION SHOULD HAVE BEEN 

473 ABORTED DUE TO THE PGE ERROR. 

4?5 21. TEST RMR IN RSER 

47^ HERE A URITE COMMAND IS GIVEN AND DURING ITS EXECUTION THE 

H7B PROGRAM TRYS TO MODIFY THE RSDA REG. THIS SHOULD CAUSE THE 

n79 RMR BIT TO SET UHICH CAUSES T« ERR BIT TO SET. T«SE BITS 

480 ARE THEN CLEARED. 

mII 22. TEST DCK IN RSER 
4S3 

4S« HERE A MRITE COMMAND IS GIVEN THEN DURING THIS FUNCTION^ A 

4SB DRIVE CLEAR COMMAIC IS GIVEN. THIS SHOULD CAUSE T« DCK BIT 

48& TO SET UHICH SHOULD CAUSE THE ERR BIT TO SET. THESE BITS ARE 

4B7 THEN CLEARED. 

?p 23. TEST DISK ADDRESS REGISTER 

4I1 LOAD THE LAST DISK ADDRESS (7777) INTO RSDA. DO A ONE UORD 

4% URITE MD CHECK THAT RSDA INCREMENTED TO 10000. 

4I4 24. TEST IRE ERROR 

4% DO A ore UORD URITE BUT FIRST SET RSDA TO AN INVALID ADDRESS 

497 SUCH AS 10000. THIS SHOULD CAUSE A lAE ERROR WICH MILL 

498 CAUSE ERR, ATA AND 5C BITS TO SET. THESE BITS ARE T^€N 

499 CLEARED 8^ LOADING A 1 INTO ATA IN RSAS. 
5X 

5C1 25. TEST FOR NO«-£XISTENT DISK ERROR 
502 

503 FIRST FIND A DRIVE THAT IS NOT ON THE SYSTEM OR OFF LirC. 

SON NOU TRY TO 00 A OJC UORD URITE TO THAT DRIVE. NED IN RSCS2 

505 SHOULD SET UHICH SHOULD CAUSE TRE TO SET. THESE BITS ARE 

50b THEN CLEARED BY MOVING A 1 INTO TRE. 

5*^7 

508 26. TEST DAO IN RSER AND LBT IN RSDS 

liO SET RSDA TO ITS LAST ADDRESS. NOU URITE ONE SECTOR PLUS ONE 

511 WORD. DAO SHOULD SET AND LBT SHOULD SET. THESE SHOULD CAUSE 

512 ERR. ATA, TRE AND SC TO SET. THESE ARE CLEARED BY DOING A 

513 CLEftR. 

515 27. TEST BAI IN R5CS2 
51b 

517 SET BAI IN RSC52. DO A ONE UORD WRITE AND CHECK R3BA TO SEE 



COS 

518 if IT INCRETCNTED. 
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DtSCRIPTION 

28. TEST NON-EXISTENT MEMORY ERROR BIT IN RSCS2 

SET BITS 0 THROUGH 5 IN RHBAE FOR AN 22 BH ADDRESS. MOV 
173000 INTO RSBA. K^; -1000 INTO RSUC AND DO A URITE 
FUNCTION. THE NEH BIT SHOULD SET AND SHOULD CAUSE TRE TO 
SET. CLEAR THESE BITS BY LOADING A I INTO TRE. 

29. TEST FOR ZERO'S IN A PARTIALLY FILLED SECTOR 

FIRST WRITE A COMPLETE SECTOR WITH ALL ONES. T^€N DO A ONE 
WORD URITE. THE REMAINING 63 UOROS SHOULD BE WRITTEN AS 
ZERO'S. NOW DO A WRITE CHECK TO COMPARE FOR THESE ZERO'S. 



30. PRIORITY INTERRUPT TEST 

HERE THE PROGRAM ENABLES THE INTERRUPT AND DOES A 
WRITE FUNCTION. THE PROGRAM SHOULD NOT TRAP 
PROCESSOR IS DROPPED TO PRIORITY 4. 

31. OYNANIC FUNCTION TEST 



ONE WORD 
UNTIL THE 



WILE ONE DRIVE IS READING, THE UNIT • IN RSCS2 IS MODIFIED. 
IF THERE IS ANOTHER DRl(€ ON THE SYSTEM, A DRIVE SEARCH IS 
PERFORMED ON IT. THIS IS ALL DONE WHILE tAe FIRST DRIVE IS 
STILL READING. 



■ REM-/. 
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58b 

537 

588 

589 

590 

591 

592 

593 

594 

595 

5% 

597 

596 
599 

bOC 
bOl 
b02 
bQ3 
b24 

bOS THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT 

bCb NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT DIGITAL 

bC7 EQUIPMENT CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES NO 

bQ8 RESPONSIBILITY FOR ANY ERRORS THAT NAY APPEAR IN THIS MANUAL. 

b{3S 

blC THE SOFTyflRE DESCRIBED IN THIS DOCUMENT IS FURNISHED TO THE 

bii PURCHASER UNDER A LICENSE FOR USE ON A SINGLE COMPUTER SYSTEM AND 

bi2 CAN BE COPIED (WITH INCLUSION OF DIGITAL'S COPYRIGHT NOTICE) ONLY 

'->13 FOR USE IN SUCH SYSTEM, EXCEPT AS MAY OTHERWISE BE PROVIDED IN 

bIH WRITING BY DIGITAL. 

bis 

bib DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY FOR THE 

bl7 USE OR RELIABILITY OF ITS SOFTWARE ON EQUIPMENT THAT IS NOT 

bie SUPPLIED BY DIGITAL. 

biS 
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bbS DESCRIPTION 

b70 

{,71 1. flSSTRPCT 

It! this diagnostic UAS designed to test RS03 AND KSOM DRIVES. 

bTM 

bTS 'HIS IS fl BfiSIC FUNCTION DIAGNOSTIC WHICH IS USED TO VERIFY THAT 'HE 

b76 iRHli) CONTROLLER AND THE (RS03 OR RSOH) DISKS ARE OPERATING 

677 CORRECTLY. THIS IS NOT A RELIABILITY DIAGNOSTIC AND THEREFORE SHOULD 

678 NOT BE USED AS Or€. THIS PROGRAM CAN TEST UP TO 8 DRIVES. THE DRIVES 
67S cm BE INTERMIXED AND IN ANY ORDER. 

660 

681 IF THE OPERATOR WOULD LIKE TO CHECK THE DISK REGISTERS PRIOR TO 

682 ENTERING THI5 DIAGNOSTIC. THERE ARE SOME ROUTINES IN THE BACK OF THE 

683 DIAGNOSTIC WHICH CAN BE USED. THESE ROUTINES WILL ALLOW THE OPERATOR 
b8S TO LOAD THE REGISTERS THROUGH THE SWITCHES. PLEASE REFERENCE THE 
685 STARTING ADDRESSES THAT WILL TEST THE REGISTERS YOU DESIRE. 

686 
687 
688 

689 a. REQUIREMENTS 

£)% 

6')1 

6S£ 

693 2.1 EQUIPnENT 

LOU 

69S PDPll STANDARD COMPUTER WITH A MINIMUM OK 8K OF MEMORY, AND AN RHll 

6% CONTROLLER WITH fl RS03 OR RSOH 0I5K. 

697 

698 

700 2.3 PRELIMINARY PROGRflMS 

701 

702 NONE 

703 

704 

701 3. LOADING PROCEDURE 

708 USE STANDARD PROCEDURE FOR flBS TflPES. 

709 
710 
711 

712 H. STARTING PROCEDURE 

713 

714 

716 4.1 CONTROL SWITCH SETTINGS 

717 

718 SEE 5.1.1 (ALL DOUN FOR UORST CASE TESTING) 

719 

720 

m 4.2 STARTING ADDRESS 
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7§4 
755 
TSfc 
757 
758 
75S 
7M 
761 
7b2 
7b3 
7bM 
7b5 
766 
767 
768 
769 
770 
771 
772 
773 
77H 
7-^ 
77b 
777 



4.3 PROGRAM AND/OR OPERATOR ACTION 
LOAD PROGRAM INTO MEMORY USING ABS LOADER. 
1. STARTING ADDRESS 200. 

A. SET SUITCHES (SEE SEC 5.1.1) ALL D0i4N FOR UORST CASE 

B. PRESrSTART. 

C. THE PROGRAM UILL LOOP AND BELL UILL RING ONCE EVERY PASS 

D. THE DIgLAY ON THE 11/45 WILL SHOW THE ITERATION COUNT IN 
THE L&T BYTE AND TEST NUMBER IN THE RIGHT. TO USE, SET 
THE DATA DISPLAY SWITCH TO THE DISPLAY POSITION. 

E. THE PROGRAM MUL TEST ALL RS03 AND RS04 DISKS. 



2. STARTING ADDRESSES FOR TESTING 
USING THE SWITCH REGISTER. 



THE RH11-RS03/04 REGISTERS 



A. SSO WORD COUNT REGISTER TEST 

B. 254 BUS ADDRESS REG. TEST 

C. 260 DISK A00RES5 REG. TEST 

D. 264 DRIVE STATUS REG. TEST 

E. 270 ERROR REG. TEST 

F. 274 LOOK AHEAD REG. TEST 

G. 300 RSCS2 REG. TEST 

H. 304 AHENTION SUHNARY REG. TEST 

I. 310 MAINTENANCE REG. TEST 
J. 314 RSCSl REG TEST 



5. OPERATIONAL SWITCH SETTINGS 

SWITCH SETTINGS ARE: 

SW<15> = 1 HALT ON ERROR 

SW<14> = 1 LOOP ON TEST 

SW<13> s 1 INHIBIT TYPEOUTS 

SW<11> s 1 INHIBIT ITERATIONS OF SUBTEST 

SH<IO> si BELL ON ERROR 

0 BELL ON PASS COMPLETE 

5W<09> s 1 LOOP ON ERROR 

SW<OB> si LOOP ON TEST IN SW<7:0> 



5.2 SUBROUTINE ABSTRACTS 
5.2.1 SCOPE 

THIS SUBROUTINE CALL IS PLACED BETWEEN EACH SUBTEST IN THE INSTRUCTION 
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s^9J.PP-,.JI RECORDS THE STARTING fiDDhliS OF EACH SUBTEST AS IT IS 
^80 BEING ENTERED IN »OCATION "LAO". IF A SCOPE LOOP IS REOJESTED, THE 
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732 DESCRIPTION 

783 

78H 

7fi5 CURRENT SUBTEST MILL BE LOOPED UPON. SW<11> ON A 1 INHIBITS ITERATION 

796 or SUBTESTS. THE CONTENTS OF LAD HAY BE USED TO OETERNINE THE LAST 

787 SUBTEST SUCCESSFULLY COMPLETED. 

788 

78«3 

790 

791 5.2.2 HLT 

792 

793 THIS ROUTINE PRINTS OUT AN ERROR MESSAGE (SEE 6.1). TO INHIBIT 

79H TYPEOUTS, PUT SW<13> ON A 1. 

795 
7% 
797 

800 A -.+2" - -HALT- SEQUENCE IS REPEATED FROM 0 - 776 TO CATCH ANY 

801 UNEXPECTED TRAPS. THUS ANY UNEXPECTED TRAPS OR INTERUPTS MILL HALT AT 

802 THE VECTOR * 2. 



803 
804 



5.2.3 TRAPCATCHER 



6. ERRORS 



808 
809 

810 6.1 ERROR PRINTOUT 

812 THE FORMAT IS AS FOaOUS: 

8l3 

814 ADR CSl = CS2 ER = 

815 QOOD BAD = 

816 

817 UHERE: 
818 

819 CS1.CS2,ER ETC. = RSll DISK REGISTERS. 

820 G006 = EXPECTED DATA. 

821 BAD = DATA RECEIVED. 
822 

823 TO FIND THE FAILING TEST, LOOK AT THE LISTING ABOVE THE ADDRESS TYPED. 

824 

825 

826 

827 6.2 ERROR RECOVERY 

828 

829 RESTART AT 200 

830 

831 

832 

833 7. RESTRICTIONS 

834 

53S NONE 



LOS 

rHiNOEC-ll-OERSA-A RSil-R£C3-RSQ4 BftSIC FUNCTION DIAGNOSTIC fMCYU 27(732) 0b-0CT-7b 08:51 PAGE 25 

0ERS««.P11 

936 nftINDEC-il-OERSA«fl RH11-RS03-RS0H BASIC FUNCTION DIAGNOSTIC PAGE 7 

837 DESCRIPTION 

838 

83S 

840 8. niSCELLANEOUS 

841 

842 

643 

844 g.i EXECUTION TINE 

845 

84| A BELL UILL RING UITHIN 1 MINUTE UITH ALL SWITCHES DOUN. 

847 

848 

8S0 8.2 STACK POINTER 

851 

852 STACK IS INI TALLY SET TO 500 

8S3 

854 

855 

85b URITE LOCK TEST 

Pa THE WRITE LOCK TEST REQUIRES OPERATOR INTERVENTION. THE STARTING 

659 ADDRESS FOR THIS TEST IS 220. THE PROGRAM MILL TELL THE OPERATOR 

6b0 WHICH SWITCHES HAVE TO BE SET. 

8bl 

8b2 

8b3 

8b4 10. TEST DESCRIPTION 

BbS 

Bbb 1. TEST RSCS2 

6b7 

BbB CLEAR Aa READ/WRITE BITS AND CHECK. SET ALL R/W BITS AND 

Bb9 CHECK. NOW CLEAR AND RECHECK. 

870 

871 2. TEST FOR ONLINE DRIVES 

873 SET ERROR BITS IN RSER. THIS CAUSES ATTENTION 5UHNARY BITS 

67M TO SET IN RSAS. DO FOR ALL DRIVES. RSAS HAS NOT YET BEEN 

675 TESTED. SO IN THE CASE OF NO BITS IN RSAS SETTING, DRIVE 0 

B7b IS TESTED. 

878 3. RESET TEST FOR REGISTERS 

880 SET ALL R/W BITS IN RSCSl, RSCS2, RSBA. RSDA, RSER. RSWC. 

881 RSDB. AND RSNR. DO A RESET AND T^ST ALL R/U BitS TO 

882 CLEffiEO. 
883 

884 H. SET AND CLEAR ALL REGISTERS 
885 

8Bb SET ALL R/W BITS IN RSCSl. RSCS2. RSBA. RSDA. RSER, RSWC. 

887 RSDB AND RSNR AND TEST. §ET ALTERNATE 6lTS AN6 CHECK TO NAK^ 

888 SURE BITS ARE NOT TIED TOGETHER. NOW SET ALL BITS AND CLEAR 
689 THEN TO MAKE SURE ALL CAN BE CLEARED ONCE SET. 

391 5. RANDOM NUMBER TEST FOR RSWC AND RSDA 
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8S3 THIS TEST GENERATES RANOOil NUMBERS AND LOADS THEr; INTO RSUC, 
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894 MfllNOEC-Ji-OERSfl-A RH11-RS03-RS04 BASIC FUNCTION DIAGNOSTIC PACE B 

895 DESCRIPTION 
8% 

897 

896 RSOA AND RSBA. 

900 &. TEST "CLEAR BIT" IN RSCS2 
901 

902 SET ALL R/W BITS IN RSCSi, RSCS2, RSBA. RSDA, RSER. RSMC 

903 RSDB, AND RSflR. SET CLEAR BIT IN RSCS2. NOH TEST ALL R/W 
90M BITS FOR 0 IN ALL THE ABOVE REGISTERS. 

9C5 

90b 7. LOAD RSDB WITH ALL ONES AND ALL ZEROS 
907 

908 LOAD RSDB WITH A UORD OF ZEROS AND A UGRD OF ONES. UAIT FOR 

909 "OR" TO SET AND THEN CHECK OUTPUT OF SILO. IF OR DID NOT SET 

910 ERROR MESSAGE APPEARS. 
9' 1 

912 8. TEST NO-OP FUNCTION 

914 THE NO-OP FUNCTION IS TESTED UITH AND UITHOUT ERROR BITS SET. 

915 ALL THE REGISTERS ARE CHECKED AFTER BOTH CASES. 

1l7 9. TEST DRIVE CLEAR FUNCTION 
918 

919 FIRST SET ALL R/U BITS IN RSDA, R5UC. RSER. AND RSNR. DO A 

920 DRIVE CLEAR FUNCTION. NOU TEST ALL REGISTERS FOR CORRECT 

921 DATA. 

gii 10. EXECUTE A ONE WORD URITE FUNCTION 
924 

925 SET RSUC TO -1. NOV -1 INTO OUTBUF. LOAD RSBA UITH OUTBUF. 

926 DO A WRITE TEST RDY BIT FOR 0 THEN WAIT FOR IT TO SET. TINE 

927 OUT TO ERROR IF ROY BIT DOESN'T SET AMD CHECK FOR ERROR 

928 CONDITIONS. TEST RSDA FOR CORRECT ADDRESS. TEST WORD COUNT 

929 FOR 0. 

931 U. EXECUTE A ONE WORD URITE CHECK 

933 SET UP RSDA, RSBA. RSUC AND OUTBUF AS IN THE WRITE FUNCTION 

934 TEST. DO A WRItE CHECK FUNCTION. TEST RDY AS DONE IN THE 

935 URITE TEST. CHECK FOR URITE CHECK ERROR. THEN TEST RSDA, 

936 RSUC AND RSBA FOR CORRECT DATA. 

9^ 12. TEST READ FUNCTION 
939 

940 SETUP RSDA. RSBA, RSUC AND OUTBUF AS IN THE WRITE FUNCTION DO 

941 A READ FUN6tIQN. TEST ROY BIT AS DONE IN THE WRITE FUNCTION. 

942 TEST FOR ERRORS. ALSO TEST RSDA, RSUC AND RSBA FOR CORRECT 

943 DATA. 
944 

13. TEST BLOCK SEARCH FUNCTION, PIP AND DRY BITS AND ADDR. CONF. 



131 



947 

948 DO A BLOCK SEARCH FOR SECTOR 32. LOOP ON ADDR. CONF.^ BIT IN 

949 RSNR. IF IT DOESN'T SET, TIMEOUT. WHEN YOU GET THERE DO A 
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953 BLOCK SEARCH FOP SECTOR C. NOW wE i^NOw THAT yE^HAvE TXHE TO 

?|l TEST FOR DRY AND PIP BITS BEFORE FINDING SECTOP C. FOR PIP 
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953 DESCRIPTION 
95M 

HI SHOULD SET AND DRY SHOULD CLEAR BEFORE FINDING SECTOR 0. 

957 ONCE SECTOR 0 IS FOUND PIP SHOULD CLEAR m DRY SHOULD SET. 

958 IF DRY DOES NOT SET A TINE OUT ERROR UILL OCCUR INDICATING 

959 SECTOR 0 WAS NOT FOUND. 5C IN RSCSl SHOULD ALSO SET. RSBA 
9b0 AND RSUC SHOULD NOT MOVE, THIS IS ALSO TESTED. 

%' 

9b2 14. ILLEGAL FUNCTION CODE TEST 
9b3 

9bH IN THIS TEST RSBA, RSUC AND RSDA ARE SET UP AS IF TO DO A 

9fe5 LEGAL FUNCTION. AN ILLEGAL FUNCTION IS THEN EXECUTED. HE 

%b PROGRAM TEST FOR ILF AND ERR BITS TO SET. RSBA. RSUC AND 

%7 RSDA ARE ALSO TESTED FOR CORRECT DATA. THIS IS 60NE FOR ALL 

968 THE ILLEGAL FUNCTIONS. 
%9 

970 FOR AN AID IN TROUBLE SHOOTING THE ILLEGAL FUNCTION CODE CAN 

971 BE LOADED INTO LOCATION ILLTAB OR ILFTB2, DEPENDING ON WHICH 

972 ILLEGAL FUNCTION TEST YOU WISH TO LOOP ON. IN THE fCXT 
9^ LOCATION. FOLLOUING THE ILLEGAL FUNCTION, A 0 NUST BE LOADED. 
97M NOU BY SETTING SHITCH 14 (LOOP ON TEST), YOU MILL LOOP ON THE 
975 ILLEGAL FUNCTION. 

97t 

977 15. TEST PAR IN RSER 
978 

979 SET PAR IN RSER AfC CHECK. ft.SO TEST ERR IN RSDS TO SET 

980 BECAUSE OF THE PAR SETTING. 
981 

982 16. TEST DPR AND NOL IN RSDS 
983 

984 BOTH THESE BITS SHOULD BE SET IN RSDS IF THE DRIVE IS ON LINE 

985 Af© UP TO SPEED. 
966 

987 17. LOOK AHEAD TEST 
988 

989 FIRST CHECK TO SEE IF SECTOR FRACTION BITS ARE MOVING. NOW 

990 SET RSDA TO 0 ATC INCREMENT IT EVERY TINE THE ADDR.CONF BIT 

991 SETS. IF THE AODR.CONF BIT DOES NOT SET IN A CERTAIN LENGTH 

992 OF TINE, A TINE OUT ERROR OCCURS. 
993 

994 IB. PARITY TEST 

<m 

9% THIS WILL TEST THE PARITY LOGIC ONLY IF THERE IS PARITY 

997 tCHORY ON THE SYSTEM IN LESS THAN 28K. IT WILL WRITE BAD 

998 PARITY IN A MEMORY LOCATION T«N TRY TO DO A WRITE TO THC 

999 DRIVE FROM THAT LOCATION. THIS SHOULD CAUSE A PARITY ERROR. 

1000 

1001 19. TEST WRITE CHECK ERROR 
1002 

1003 IN THIS TEST THE PROGRAM WRITES A -1 ON TO THE DISK. A 0 IS 

1004 NOW FLOATED THROUGH T»€ WORD IN THE BUS ADDRESS LOCATION, AND 

1005 A WRITE CHECK FUNCTION IS DONE. THE WCE BIT IN RSCS2 SHOULD 

1006 SET AND SHOULD CAUSE THE TRE BIT IN RSCSl TO SET. THESE BITS 

1007 ARE THEN CLEARED. A WORD OF 0 IS NOW WRITTEN ON THE DISK AND 
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WRITE CHECK FUNCTION TEST IS REPEATED. 
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101 1 DESCRIPTION 

IQIH 20. TEST PROGRAM ERROR BIT IN RSCS2 
1015 

1016 HERE THE PROGRAM ATTEMPTS TO INITIATE A DATA TRANSFER 

:017 OPERATION WHILE THE CONTROL IS CURRENTLY PERFORMING ONE. 

1019 THIS SHOULD CAUSE PGE TO SET WHICH SHCULD CAUSE IRE TO SET. 
ID13 THESE BITS ARE THEN CLEARED. RSWC IS ALSO TESTED FOP IT 

1020 SHOULD NOT BE 0 FOR THE CURRENT OPERATION SHOULD HAVE BEEN 

1021 ABORTED DUE TO THE PGE ERROR. 
1022 

1023 21. TEST RMR IN RSER 
102M 

:02s HERE A WRITE COMMAND IS GIVEN AND DURING ITS EXECUTION THE 

i02t> PROGRAM TRYS TO MODIFY THE RSDA REG. THIS SHOULD CAUSE THE 

1027 RMR BIT TO SET WHICH CAUSES THE ERR BIT TO SET. THESE BVS 

IfSB ARE THEN CLEARED. 



1030 £2. TEST DCK IN RSER 
1031 

1032 HERE A WRITE COMMATffi IS GIVEN THEN DURING THIS FUNCTION A 

lOS DRIVE CLEAR COMMAND IS GIVEN. THIS SHOULD CAUSE THE DCK BIT 

1034 TO SET WHICH SHOULD CAUSE THE ERR BIT TO SET. THESE BITS ARE 

1035 THEN CLEARED. 
1038 

1037 23. TEST DISK ADDRESS REGISTER 
1038 

1039 LOAD THE LAST DISK ADDRESS (7777) INTO RSDA. DO A ONE WORD 

1040 WRITE AND CHECK THAT RSDA INCREMENTED TO 10000. 

1042 24. TEST lAE ERROR 

1044 00 A ONE WORD WRITE BUT FIRST SET RSDA TO AN INVALID ADDRESS 

n 'fc g'iixrw ^ m Ws w m 

1047 CLEARED LOADING A 1 INTO ATA IN RSAS. 
1046 

1045 25. TEST FOR NON-EXISTENT DISK ERROR 

18I1 FIRST FIND A DRIVE THAT IS NOT ON THE SYSTEM OR OFF LINE. 

1052 NOW TRY TO DO A ONE WORD WRITE TO THAT DRIVE. NED IN RSCS2 

1055 

105b 2&. TEST OAO IN RSER AND LBT IN RSDS 

iSlfl SET RSDA TO ITS LAST ADDRESS. NOW WRITE ONE SECTOR PLUS ONE 

1059 WORD. OAO SHOULD SET AND LBT SHOULD SET. THESE SHOULD CAUSE 

1060 ERR. ATA, TRE AND SO TO SET. THESE ARE CLEARED BY DOING A 

1%1 cleAr. 

ioli 27. TEST BAI IN RSCS2 

1064 

1065 SET BAI IN RSCS2. DO A ONE WORD WRITE AND CHECK RSBA TO SEE 
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ObS DESCRIPTION 



lObS 



28. TEST NON-EXISTENT MENORY ERROR BIT IN RSCS2 



1073 SET BITS 0 THROUGH 5 IN RHBAE FOR AN 22 BH ADDRESS. KOV 

173000 INTO RSBA. MOV -iOOO INTO RSMC AND DO A WRITE 
FUNCTION. THE NEH BIT SHOULD SET AND SHOULD CAUSE TRE TO 
1076 SET. CLEAR THESE BITS BY LOADING A 1 INTO TRE. 

1077 

1078 29. TEST FOR ZERO'S IN A PARTIALLY FILLED SECTOH 

1079 

1080 FIRST URITE A COMPLETE SECTOR WITH ALL ONES. THEN DO A ONE 

1081 WORD URITE. THE REMAINING 63 UORDS SHOULD BE WRITTEN AS 

1082 ZERO'S. NOW DO A WRITE CHECK TO COMPARE FOR THESE ZERO'S. 

30. PRIORITY INTERRUPT TEST 

1086 HERE THE PROGRAM ENABLES THE INTERRUPT AND DOES A ONE WORD 

1087 WRITE FUNCTION. THE PROGRAM SHOULD NOT TRAP UNTIL THE 
lOg PROCESSOR IS DROPPED TO PRIORITY 4. 

inO 31. DYNAMIC FUNCTION TEST 

1092 WHILE ONE DRIVE IS READING, THE UNIT I IN RSCS2 IS MODIFIED. 

1093 IF THERE IS ANOTHER DRiC'E ON THE SYSTEM. A DRIVE SEARCH IS 

1094 PERFORMED ON IT. THIS IS ALL DONE WHILE THE FIRST DRIVE IS 

1095 STILL READING. 

181^ ^REM-/. 

1098 

1099 

1100 

1101 

1102 

1103 

1104 

1105 

1106 

1107 

1108 

1109 

UIO 

nil 

1112 
1113 
1114 

iiil IDENTIFICATION 

1117 

lllB 

1119 
1120 
1121 
1122 
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1133 nAINDEC-ll-DERSft-A RH11-RS03-RS04 BASIC FUNCTION DIAGNOSTIC PAGE 2 

113M 

1135 

113b 

1137 

1138 

1139 

1140 

llHl 

1142 

1143 

1144 

1145 

114B 

1147 

114B 

I14q 

1150 

1151 

1152 

1153 THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE HITHOUT 

IISH NOTICE AND SHOULD NOT BE CONSTRUED AS A COmiTMENT BY DIGITAL 

Ills EQUIPMENT CORPORATION. DIGITAL EQUIPMENT CORPORATION ^SUMES NO 

llib RESPONSIBILITY FOR ANY ERRORS THAT HAY APPEAR IN THIS MANUAL. 

}}§ THE SOFTWARE DESCRIBED IN THIS DOCUMENT IS QJWflgCD^TO^ THE 

111? PURCHASER UNDER A LICENSE FOR USE ON A SINGLE COMPUTER SYSTEM AND 

lllo CAN BE COPIED (WITH INCLUSION OF DIGITAL'S COPYRIGHT NOTICE)ONLY 

llbl FOR USE IN SUCH SYSTEM, EXCEPT AS MAY OTHERWISE BE PROVIDED IN 

11£>2 URITING BY DIGITAL. 

IiIm digital equipment CORPORATION ASSUMES NO RESPONSIBILITY FOR THE 

llbS USE OR RELIABILITY OF ITS SOFTWARE ON EQUIPMENT THAT IS NOT 

lid SUPPLIED BY DIGITAL. 
1167 

1 ICQ 

ill? COPYRIGHT (C) 1973, DIGITAL EQUIPMENT COPR., MAYNARD, MASS. 
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121b DESCRIPTION 

1217 

1218 

1219 1. ABSTRACT 

Ip? THIS DIAGNOSTIC WAS DESIGNED TO TEST RS03 AND RS04 DRIVES. 

1223 THIS IS A BASIC FUNCTION DIAGNOSTIC WHICH IS USED TO VERIFY THAT THE 

1224 (RHll) CONTROLLER AND THE (RS03 OR RS04) DISKS ARE OPERATING 
12§5 CORRECTLY. THIS IS NOT A RELIABILITY DIAGNOSTIC AND THEREFORE SHOULD 
1226 NOT BE USED AS ONE. THIS PROGRAM CAN TEST UP TO 9 DRIVES. THE DRIVES 
122? CAN BE INTERMIXED AND IN ANY ORDER. 

ifp IF THE OPERATOR WOULD LIK»: TO CHECK THE DISK REGISTERS PRIOR TO 

1230 ENTERING THIS DIAGNOSTIC. THERE ARE SOME ROUTINES IN THE BACK OF THE 

ll31 DIAGNOSTIC WHICH CAN BE USfeO. THESE ROUTINES WILL ALLOW THE OPERATOR 

1232 TO LOAD THE REGISTERS THROUGH THE SWITCHES. PLEASE REFERENCE THE 

1233 STARTING ADDRESSES THAT WIU TEST THE REGISTERS YOU DESIRE. 
1234 

1235 

1237 2. REQUIREMENTS 

1238 

i23S 

1240 

1241 2.1 EQUIPMENT 

1242 

1243 PDPll STANDARD COMPUTER WITH A MINIMUM OK 8K OF MEMORY, AND AN RHll 

1244 CONTROLLER WITH A RS03 OR RS04 DISK. 
1245 

12% 
1 ?^7 

1248 2.3 PRELIMINARY PROGRAMS 

1249 

1250 NONE 

1251 

1252 

1253 

1254 3. LOADING PROCEDURE 

1255 

125b USE STANDARD PROCEDURE FOf{fiBS TAPES. 

1257 

1258 

iibO 4. STARTING PROCEDURE 

12bl 

1262 

1263 

1264 4.1 CONTROL SWITCH SETTINGS 

1265 

1266 SEE 5.1.1 (ALL DOWN FOR WORST CASE TESTING) 

1267 

1268 

1270 H.2 STARTING ADDRESS 
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1271 fIfllNDEC-li-OERSfl-ft RH11-RS03-RS04 BASIC FUNCTION DIAGNOSTIC PWE 5 

1272 DESCRIPTION 
1273 

127M 

1275 H.3 PROGRAM fiND/OR OPERATOR ACTION 

1277 LOAD PROGRAM INTO MEMORY USING ABS LOADER. 

\m 1. STARTING ADDRESS 200. 

1280 

1281 A. SET SWITCHES (SEE SEC 5.1.1) ALL DOWN FOR WORST CASE 

1282 B. PRESS START. 

1283 C. THE PROGRAM WILL LOOP AND BELL WILL RING ONCE EVERY PASS 
iIbm D. the DISPLAY ON THE 11/45 WILL SHOW THE ITERATION COUNT^IN 
lis? THE LEFT BYTE AND TEST NUMBER IN THE RIGHT. TO USE, SET 
12^ THE DATA DISPLAY SWITCH TO THE DISPLAY POSITION. 

1287 E. THE PROGRAM WILL TEST ALL RS03 AND RS04 DISKS. 

ipBo 

1289 2. STARTING ADDRESSES FOR TESTING THE RH11-RS03/04 REGISTERS 

12Sa USING THE SWITCH REGISTER. 

1291 
1292 
1293 
129H 
1295 
1296 
1297 
1298 
1299 
1300 
1301 
1302 
1303 

1305 5. OPERATIONAL SWITCH SETTINGS 

130fc 

1307 SWITCH SETTINGS ARE: 

IM? SU<1S> si HALT ON ERROR 

1310 SU<14> =1 LOOP ON TEST 

1311 -U<13> =1 INHIBIT TYPEOUTS 

1312 SI4<11> = 1 INHIBIT ITERATIONS OF SUBTEST 

1313 SU<10> =1 BELL ON ERROR 

131M 0 BELL ON PASS COMPLETE 

1315 SU<09> = 1 LOOP ON ERROR 

131E, SW<08> s 1 LOOP ON TEST IN SW<7:0> 

1317 
1318 

1320 5.2 SUBROUTINE ABSTRACTS 
1321 
1322 
1323 

1324 5.2.1 SCOPE 

{ail THIS SUBROUTINE CALL IS PLACED BETWEEN EACH SUBTEST IN THE INSTRUCTION 



A. 


250 


WORD COUNT REGISTER TEST 


8. 


254 


BUS ADDRESS REG. TEST 


C. 


2b0 


DISK ADDRESS REG; TEST 


D. 


2b4 


DRIVE STATUS REG. TEST 


E. 


270 


ERROR REG. TEST 


F. 


274 


LOOK AHEAD REG. TEST 


G. 


300 


RSCS2 REG. TEST 


H. 


304 


ATTENTION SUMMARY REG. TEST 


I. 


310 


MAINTENANCE REG. TEST 


J. 


314 


RSCSl REG TEST 
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SECTIOM. IT RECORDS THE STARTING ADDRESS OF EACH SUBTEST AS IT IS 
BEING ENTERED IN LOCATION "LAD". IF A SCOPE LOOP 13 REQUESTED, THE 
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1329 1fiINDEC-li-DER5fl-ft RH11-RS03-RS04 BASIC FUnCTION DIftGNOSTIC PftGE b 

1330 DESCRIPTION 
1331 

1333 CURRENT SUBTEST WILL EE LOOPED UPON. SW<11> ON fi 1 INHIBITS ITERATION 

liii OF SUBTESTS. THE CONTENTS OF LAD MAY BE USED TO DETERMINE THE LAST 

1335 SUBTEST SUCCESSFULLY COMPLETED. 

133b 

1337 

1338 

1339 5.2.2 HLT 

1341 THIS ROUTINE PRINTS OUT AN ERROR MESSAGE (SEE b.l). TO INHIBIT 

13M2 TYPEOUTS, PUT SU<13> ON A 1. 

13M3 

13HM 

*345 

l3Sb 5.2.3 TRflPCATCHER 

134B fi ".+2" - "HALT" SEQUENCE IS REPEATED FROM 0 - 77b TO CATCH ANY 

1349 UNEXPECTED TRAPS. THUS ANY UNEXPECTED TRAPS OR INTERUPTS MILL HALT AT 

1350 THE VECTOR ♦ 2. 

1351 
1352 
1353 

1354 b. ERRORS 

1355 

135b 

IsIb b.l ERROR PRINTOUT 

isbO THE FORMAT IS AS FOLLOWS: 

tot, I 

3b2 ADR CSl = CS2 = ER = 

13b3 GOOD = BAD = 

lis WHERE: 

1367 CSLCS2,ER ETC. = RSll DISK REGISTERS. 

[ilQ mt = EXPECTED DATA. 

1269 BAD = DATA RECEIVED. 

•371 TO FIND THE FAILING TEST, LOOK AT THE LISTING ABOVE THE ADDRESS TYPED. 

1372 

1373 

1375 b.2 ERROR RECOVERY 

1377 RESTART AT 200 

1378 
1379 
1380 

1381 7. RESTRICTIONS 

1382 

1383 NONE 
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:39M WlIfCCC-ll-0£RSft-fi RHll-R503-ftS0H BASIC FlhCTION DIAGNOSTIC PAGE 7 

i39S DESCRIPTION 

139b 

8. niSCELLANEOUS 

1389 

;3« 

isli S.i EXECUTION TIME 



i3S3 



A BELL Ula RING UITHIN 1 niNUTE UITH ALL SWITCHES DOUN. 



:3« 8.2 STACK POINTER 

IhQO STACK IS INITALLY SET TO 500 

1401 

1H02 

iH04 9. WRITE LOCK TEST 
1405 

IHOb THE «R!T£ LOCK TEST REQUIRES OPERATOR INTERVINTION. THE STARTING 

:-fC7 ADDRESS FOR THIS TEST IS 220. THE PROGRAN UILL TELL THE OPERATOR 

1408 WHICH 5UITCHES HAVE TO BE SET. 

HiO 

inil iJ. TEST DESCRIPTION 
1413 

1414 1. TEST RSCS2 

i^iil CLEAR AU READ/URITE BITS AfC C(€CK. SET Aa R/U BITS AND 

1417 CHECK. NOW CLEAR AND REC»€CK. 

141! 2. TEST FOR ON.INE DRIVES 

l3ll SET ERROR BITS IN RSER. THIS CAUSES ATTENTION SUNNARY BITS 

i422 TO SET IN RSAS. 00 FOR ALL DRIVES. RSAS HAS NOT YET BEEN 

mil TESTED. SO IN THE CASE OF NO BITS IN RSAS SETTING, DRIVE 0 

1424 IS TESTED. 

142! 3. RESET TEST FOR REGISTERS 

14a SET ALL R/H BITS IN RSCSl, RSCS2, RS8A. RSDA, RSER. RSUC. 

IHM RSOe^ AND RSHR. DO A RESET AND T^T ALL P/U Bits TO Bt 

1430 CLEAAEO. 

1432 4. SET AND CLEAR AU REGISTERS 
1433 

I43M SET ALL R/W BITS IN RSCSl. RSCS2. RSBA. RSDA, RSER, RSHC. 

14? RSDB AND RSHR «C TEST. kT ALTERNATE 6ITS AN6 CHECK TO mt 

m3fe SURE BITS ARE NOT TIED TOGETHER. NOW SET ALL BITS AfC CLEAR 

H37 THEN TO HAKE SURE ALL CAN BE CLEARED ONCE SET. 

1438 

m3<3 5. RANDOM NUMBER TEST FOR RSUC AND RSDA 
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1440 

THIS TEST GENERATES RANOOfl N'JffiERS LOADS THEK INTO RSWC. 
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1442 MAINOEC-ll-OERSA-A RHU-PSOj-RSOH BASIC FUNCTION DIAGNOSTIC PAGE 8 

mM3 DESCRIPTION 

14HM 

RSOA AND R5BA. 



4HB b. TEST "CLEAR BIT" IN RSCS2 



iS SET ALL R/U BITS IN RSCSl, R5CS2, RSBA.^ RSDA, R5ER. RSUC 

iSV RSDB. AND RSnR. SET cLEAR BIT IN RSCS2. NOil TEST ftLL R/U 

1^ BITS FOR 0 IN ALL THE ABOVE REGISTERS. 

iS 7. LOAD RSDB UITH ALL ONES AND ALL ZEROS 

iiS LOAD RSDB UITH A UORD OF ZEROS AND A UORD OF OfCS. UAIT FOR 

flW -OR- TO SET AND Tf€N CHECK OUTPUT OF SILO. IF OR DID NOT SET 

1^ ERROR rCSSAGE APPEARS. 

jiSo 8. TEST NO-OP FUNCTION 

THE NO-OP FUNCTION IS TESTED WITH AND WITHOUT ERROR BITS SET. 

I%3 ALL THE REGISTERS ARE CHECKED AFTER BOTH CASES. 

1%5 9. TEST DRIVE CLEAR FUNCTION 

1467 FIRST SET ALL R/H BITS IN RSOA, RSUC. RSER. AND RSW. DO A 

1%8 DRIVE CLEAR FUNCTION. NOU TEST ftu. REGISTERS FOR CORRECT 

1%9 DATA. 

1H71 10. EXECUTE A ONE UORD URITE FUNCTION 

1472 

1473 SET RSUC TO -1. NOV -1 INTO OUTBUF. LOAD RSBA UITH OUTBUT 

147M 00 A URITE TEST RDY BIT FOR 0 THEN UAIT FOR IT TO SET. TINE 

1475 OUT TO ERROR IF ROY BIT DOESN'T SET AND CHECK FOR EMOR 

147| CONDITIONS. TEST RSOA FOR CORRECT ADDRESS. TEST UORD COUNT 

1477 FOR 0. 

1479 11. EXECUTE A ONE UORD URITE CHECK 

jiJil SET UP RSpA, RSBA. RSUC AND OUTBUF AS IN THE URITE FUNCTION 

1482 TEST. 00 A URtTE CHECK FUNCTION. TEST ROY AS DONE IN THE 

1483 WITE TEST. CHECK FOR URITE C«CK ERROR. THEN TEST RSOA, 

1484 RSUC AND RSBA^OrTcORRECT DATA, 
luac 

148b 12. TEST READ FUNCTION 
14B7 

1488 SETUP^RSOA 

1489 R|r 

1490 TEST 

1491 DATA. 

140? 

1493 13. TEST BLOCK SEARCH FUNCTION, PIP AND DRY BITS AND AOOR. CONF. 

1494 BIT 
mac 

14% 00 A BLOCK SEARCH FOR SECTOR 32. LOOP ON AODR. ^CONF. BIT IN 

1497 RSMR. IF IT DOESN'T SET, TIMEOUT. WHEN YOU GET THERE DO A 
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14« BLOCK SEARCH FOR SECTOR Q. NOU i€ KNOU THAT UE HAVE TINE TO 

l*m TEST FOR DRY AND PIP BITS BEFORE FINDING SECTOR C. FOR PIP 



1 
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150Q »AINDEC-U-0CRSA-A RHll-RSOS-RSOH BASIC FUNCTION DIAGNOSTIC PAGE 9 

SOI DESCRIPTION 
S02 
SQ3 

SHOULD SET ^ ORY SHOULD CLEAR BEFORE FINDING SECTOR 0. 
ONCr^ SECTOR 0 IS FOUND PIP SHOULlTC' ^AR AND DRY SHOULD SET, 
IF DRY DOES NOT SET P tTmE OUT ERROR ILL OCCUR INDICATING 
SECTOR 0 UAS NOT FOUND. SC IN RSCSi SHOULD ALSO SET. RS6A 
SOB AND RSUC SHOXC NOT HOVE, THIS IS ALSO TESTED. 

iilO 14. ILLEGAL FUNCTION CODE TEST 



isis 



1513 
1S14 



IN THIS TEST RS8A, RSUC (H> RSOA ARE SET UP AS IF TO DO A 
LEGAL FlICTIQN. AN ILLEGAL FUNCTION IS THENEXECUTED. THE 
PROGRAM TEST FOft ILF AND ERR BITS TO SET. RSBA. RSMC AND 

1515 RSOA ARE ALSO TESTED FOR CORRECT DATA. THIS IS 60NE FOR AU 

1516 THE ILLEGAL FUNCTIONS. 
1517 

1518 FOR AN AID IN TROUBLE SHOOTING THE ILLEGAL FUNCTION CODE CAN 

1519 BE LOADED INTO LOCATION ILLTAB OR ILFTB2, DEPENDING ON UHICH 

1520 ILLEGAL FUNCTION TEST YOU UISH TO LOOP ON. IN THE NEXT 

1521 LOCATION. FOUOHING THE ILLEGAL FUNCTION, A 0 MUST BE LOADED. 

1522 NOW BY S|TTING SWITCH 14 (LOOP ON TEST), YOU WILL LOOP ON THE 

1523 ILLEGAL FUNCTION. 
1524 

1525 IS. TEST PAR IN RSER 

152S 

I5§7 ST PAR IN RSR Arc CHECK. ALSO TEST ERR IN RSDS TO SET 

KCAUSE OF T« PAR SETTING. 



1 

1S2S 

1530 IB. TEST DPR AND NOL IN RSDS 

1532 BOTH THESE BITS SHOULD BE SET IN RSDS IF THE DRIVE IS ON LINE 

1533 Arc UP TO SPEED. 

1535 17. LOOK AKAO TEST 

1537 FIRST CHECK TO SEE IF SECTOR FRACTION BITS ARE MOVING. NOW 

1538 SET RSOA TO 0 ATC INCREMENT IT EVERY TIME THE AODR.CONF BIT 
153S SETS. IF THE AODR.CONF BIT DOES NOT SET IN A CERTAIN LENGTH 
1540 OF TIME, A TIME OUT ERROR OCCURS. 

1541 

1542 18. PARITY TEST 

1544 THIS WILL TEST THE PARITY LOGIC ONLY IF THERE IS PARITY 

1545 MEMORY ON THE SYSTEM IN LESS THAN 28K. IT WILL WRITE BAD 

1546 PARITY IN A MEMORY LOCATION THEN TRY TO DO A WRITE TO THE 

1547 DRIVE FROM 1I1AT LOCATION. THIS SHOULD CAUSE A PARITY ERROR. 
1548 

1549 19. TEST WRITE CHECK ERROR 

1550 

1551 IN THIS TEST THE PROGRAM WRITES A -1 ON TO THE DISK. A 0 IS 

1552 NOW FLOATED THROUGH THE WORD IN THE BUS ADDRESS LOCATION. AND 

1553 A WRITE CHECK FUNCTION IS DONE. THE UCE BIT IN RSCS2 SHOULD 

1554 SET AND SHOULD CAUSE THE TRE BIT IN RSCSI TO SET. THESE BITS 

1555 ARE THEN CLEARED. A WORD OF 0 IS NOW WRITTEN ON THE DISK AND 
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15S| M 1 IS FLOATED THROUGH THE UORD IN THE BUS ADDRESS AND THE 

1557 URITE CHECK FUNCTION TEST 13 REPEATED. 
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155S DESCRIPTION 

ISbO 

15S1 

15t»2 20. TEST PROGRAM ERROR BIT IN RSCS2 

ills HERE THE PR0CRAJ1 ATTEMPTS TO INITIATE A DATA TRANSFER 

!5£.5 OPERATION WHILE THE CONTROL IS CURRENTLY PERFORMING ONE. 

1566 THIS SHOULD CAUSE PGE TO SET WHICH SHOULD CAUSE TRE TO SET. 

1567 THESE BITS ARE THEN CLEARED. RSHC IS ALSO TESTED FOR IT 
isle SHOULD NOT BE G FOR THE CURRENT OPERATION SHOULD HAVE BEEN 
1569 ABORTED DUE TO THE PGE ERROR. 

1570 

1571 21. TEST RMR IN RSER 

1573 HERE A WRITE COMMAND IS GIVEN AND DURING ITS EXECUTION THE 

157M PROGRAM TRYS TO MODIFY THE RSDA REG. THIS SHOULD CAUSE THE 

1575 RMR BIT TO SET WHICH CAUSES THE ERR BIT TO SET. THESE BITS 

157E> ARE THEN CLEARED. 

iItb £2. TEST DCK IN RSER 
157S 

ISBO HERE A WRITE COMMAND IS GIVEN THEN DURING THIS FUNCTION A 

1581 DRIVE CLEAR COMMAND IS GIVEN. THIS SHOULD CAUSE THE DCK BIT 

1562 TO SET WHICH SHOULD CAUSE THE ERR BIT TO SET. THESE BITS ARE 

1563 THEN CLEARED. 
1564 

1565 23. TEST DISK ADDRESS REGISTER 
1566 

1587 LOAD THE LAST DISK ADDRESS iTHl^ INTO RSDA. DO A ONE WORD 

1568 URITE AND CHECK THAT RSDA INCREMENTED TO 10000. 

liio 24. TEST lAE ERROR 

lIgS DO A ONE WORD WRITE BUT FIRST SET RSDA TO AN INVALID ADDRESS 

1593 SUCH AS lOQOO. THIS SHOULD CAUSE A lAE ERROR WHICH WILL 

1594 CAUSE ERR. ATA ATD SC BITS TO SET. THESE BITS ARE THEN 

1595 CLEARED LOADING A 1 INTO ATA IN RSAS. 

li* 25. TEST FOR NON-EXISTENT DISK ERROR 

ifgl FIRST FIND A DRIVE THAT IS NOT ON THE SYSTEM OR OFF LINE. 

1600 NOW TRY TO DO A ONE WORD WRITE TO THAT DRIVE. NED IN RSCS2 

1603 

1604 26. TEST DAO IN RSER AND LBT IN RSDS 

1606 SET RSDA TO ITS LAST ADDRESS. NOW WRITE ONE SECTOR PLUS ONE 

607 WORD. DAO SHOULD SET AND LBT SHOULD SET. THESE SHOULD CAUSE 

1608 ERR^ ATA, TRE AND SC TO SET. THESE ARE CLEARED BY DOING A 

1609 CLEAR. 

itil 27. TEST BAI IN RSCS2 

ill! SET BAI IN RSCS2. DO A ONE WORD WRITE AND CHECK R5BA TO SEE 
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lbl4 XF IT INCREMENTED. 
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000137 
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000220 


lb70 


000220 


000137 
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7. 



28. TEST NON-EXISTENT tIENORY ERROR BIT IN RSCS2 

SET BITS 0 THROUGH 5 IN RHBAE FOR AN 22 BIT ADDRESS. NOV 
173000 INTO RSBA. NOV -1000 INTO RSUC AND DO A URITE 
FUNCTION. THE NEH BIT SHOULD SET AND SHOULD CAUSE TRE TO 
SET. CLEAR THESE BITS BY LOADING A 1 INTOTRE. 

29. TEST FW ZERO'S IN A PARTIALLY FILLED SECTOR 

FIRST URITE A COMPLETE SECTOR UITH AU ONES. THEN DO A ONE 
UORO URITE. THE RENAINING b3 UORQS SHOULD BE URITTEN AS 
ZERO'S. NOU DO A URITE CHECK TO COMPARE FOR THEK ZERO'S. 

30. PRIORITY INTERRUPT TEST 

HERE THE PROGRAM ENABLES THE INTERRUPT AND DOES A ONE UORD 
URITE FUNCTION. THE PROGRAM SHOULD NOT TRAP UNTIL THE 
PROCESSOR IS DROPPED TO PRIORITY H. 

31. DYNAMIC FUNCTION TEST 

UHILE Or€ DRIVE IS READING. THE UNIT t IN RSCS2 IS MODIFIED. 

IF THERE IS ANOTHER ORl{^ ON THE SYSTEM. A DRIVE SEARCH IS 

PERFORMED ON IT. THIS IS ALL DONE UHILE THE FIRST DRIVE IS 
STILL READING. 



.TITLE MAINOEC-ll-OERSA-A RS11-RS03-RS04 BASIC FUNCTION DIAGNOSTIC 
; COPYRIGHT 1973,1974 DIGITAL EQUIPMENT CORP., MAYNARD, MASS. 
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SUITCH 



lENDAb 
BiT14 



000230 
Q22264 



SU15= 
SUlMs 
SU13:: 
SUl2s 
SUll: 
SUlOs 

SU9s 
SUBs 
0 
46 

52 

200 
JMP 

220 
JMP 



100000 

40000 

20000 

10000 

4000 

2000 

1000 
400 



LfiE 

HALT ON ERROR 

LOOP ON TEST 

INHIBIT ERROR TYPEOUTS 

INHIBIT ITERATIONS 

0 - BQl ON PASS COMPLETE 

1 - mL ON ERROR 
LOOP ON ERROR 

LOOP ON TEST IN SU<7:0> 
TRAP CATCHER FROM 0-776 
HOOKS FOR ACT 11 



StSTRT 



StURTLCK 



; URITE LOCK TEST 
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1671 
lb72 
lb73 
IbTM 
IbTS 
107b 
lb77 
lb78 
lb7q 
IbSO 
IbSl 
ib82 

ib85 
1 

i 

lb88 
IbSS 
lb% 
IbSI 
lb% 

ibsa 

ifcSM 
lb95 



000230 
00023b 



000250 
0002S4 
0002b0 
0002b4 
0QQ270 
00027M 
3300 




HQ 
000314 



000320 
00032b 



000230 
0H27b7 
000137 



000250 
000137 
000137 
000137 
000137 
000137 
000137 

IP 
000137 

000320 
0S27b7 
000137 
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004000 00072b 
00120b 



02147b 
021514 
021532 
021550 
0215bb 
021b04 
021bl4 

m 

021bbb 



004000 000b3b 
00120b 



230 
BIC 
JHP 



IBITII.ONCEE 
StBEGI^ 



; CLEAR TK5EL TEST FLAG 
•STARTING ADDRESS IS BEGIN 



STRT: 

: STARTING ADDRESSES FOR SWITCH REGISTER TESTING OF RH-RS REGISTERS 



250 
JMP 
JNP 
JMP 
JMP 
JflP 
JMP 
JMP 
JMP 
JMP 
JMP 

320 
BIS 
JMP 



aiSRSUC 
SiSRSBA 
aiSRSDA 

aisRsos 

aiSRSER 

aiSRSLA 

at5RC52 

aiSRAS 

aiRSMRR 

atsRscsi 



IBITII.ONCEE 
atBEGlfi 



WORD COUNT REG 
BUS ADDR REG 
DISK ADDR REG 
DRIVE STATUS REG 
ERROR REG 
LOOK AHEAD REG 
CS 



ON SUMMARY REG 



MAINTENANCE REG 
CSl REG 



;SET TKSEL TEST FLAG 
ENABLES OPERATOR TO DO A 
URITE OR READ TO A DESIRED ADDR 

; OPTIONAL UC, OA, AND UNIT t 
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700 
701 
702 
703 
TOM 
705 
706 
707 
708 
70g 
.710 
1711 
1712 
1713 
171M 
1715 
1716 
1717 
1718 
1719 
1720 
1721 
1722 
1723 
172M 
1725 
1726 
1727 
1728 
1729 
1730 



\7777h 
177570 
177570 
000007 
OOOOQO 
000001 
000002 
000003 
OOOOQH 
(X)0C05 



37 
000001 
000002 
OOOOOH 
000010 
000020 
OOOOHO 
000100 
000200 
OOOMOO 
001000 
002000 
004000 
010000 
020000 
040000 
100000 
000001 
000000 



G000= 
BA0= 



N= 

HLT= 

PS= 

PSU= 

SUR= 

DISPLAY: 

BELL= 

R0= 

Rl= 

R2r 

R3= 

R4= 

R5= 

SP= 

PC= 

BITO= 

BIT1= 

BIT2= 

BIT3= 

BIT4S 

BIT5= 

BITb= 

BIT7= 

8IT8= 

BITq= 

BITlOs 

BIT11= 

BIT12= 

BIT13= 

BIT14S 

BIT15= 

•/.I 



EMT 

177776 

PS 

177570 

:SUR 

7 

•/.o 
y.i 

•/.2 

•/.3 

•/.4 

•/.5 

V.^ 

V.7 

1 

2 

4 

10 

20 

40 

100 

200 

400 

1000 

2000 

4000 

10000 

20000 

40000 

100000 



FOR NEUTST 
HLT TO EHT FOR ERROR TYPEOUTS 
PROCESSOR STATUS 
PROCESSOR STATUS UORO 
SUITCH REGISTER 
DISPLAY REGISTER 
BELL 

RO - DEFINE REGISTERS 

Rl 

R2 

R3 

R4 

R5 

R6 - STACK POINTER 
R7 - PROGRAM COUNTER 
BIT EQUATES 



;FOR GOOD DATA 
•FOR BAD DATA 



rAlNDEC-ll-DERSfi-fl 
OFRSftfl.Pil 



RS11-RSC3-RS0H BASIC FUNCTION DIAGNOSTIC 



M04 



1731 
1732 
1733 
1734 
1735 
173S 
1737 
1738 
173«3 
1740 
1741 
1742 
1743 
1744 
1745 
174b 
1747 
1748 
1749 
1750 
1751 
1752 
1753 
ITS'* 
1755 
1756 
1757 
1758 
1758 
I7b0 
1761 
1762 
1763 
1764 
1765 
1766 
1767 
1768 
1769 
1770 
1771 
1772 
1773 
1774 
1775 
1776 
1777 
1778 
1779 
1780 
1781 
1782 



001000 
001002 
001004 
001010 
001012 
D01C14 
0Q1016 
001020 



001100 
001102 



001104 
001106 
001110 
001112 
001114 
001116 
001120 
001122 
001124 
001126 
001130 
001132 
001134 
001136 
001140 
00U42 
001144 
001146 
001150 
001152 



001000 

000000 
000000 
000000 
000000 
000000 
001000 
177564 
177566 

001100 
000000 

ooocoo 



172040 
172050 
172042 
172044 
172046 
172052 
172054 
172056 
172060 
172062 
172064 
172066 
172070 
172072 
000204 
000206 
172041 
172051 
172043 
172045 



177572 
172340 
172342 
172344 
172356 
172300 
172302 
172304 
172316 
000006 
000000 



ocoooo 



ICNT: 

ERRORS: 

PCNT: 

LAD: 

HLTfiDR: 

FILCHR: 

TPS: 

TPB: 



SAVBAD: 
OBUFSV: 



lUOO 

0 
0 

0,0 

0 

0 

1000 

177564 

177S66 

1100 

0 

0 



;DISK I/O REGISTERS 



RSCSl: 
RSCS2: 
R5UC 
RSBA: 
RSDA 
RSDS: 
RSER: 
RSAS: 
RSLA: 
RSOB; 
RSNR 
RSDT 
R56AE: 
RSCS3: 
RSVEC: 
RSVCPS: 
RSCSJB: 
RSCS2B: 
RSUC8: 
RSBAB: 



172040 

172050 

172042 

172044 

172046 

17C052 

172054 

172056 

172060 

172062 

172064 

172066 

172070 

172072 

204 

206 

172041 

172051 

172043 

172045 
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LH = ITERATION COUNT ;RH = TEST NO. 

ERROR COUNT 

2 UORD PASS COUNT 

LOOP ADDRESS FOR SCOPE 

ADDRESS OF LAST HLT INSTRUCTION EXECUTED 

FILCHR=0 (CHAR) :FILCHR+ls2 (COUNT) 

OUTPUT STATUS REGISTER 

OUTPUT BUFFER 



;LOC FOR ILLEGAL FUNCTION CODE 
;LOC OF OUTBUF 



DISK CONTROL + STATUS REGISTER 
DISK CONTROL + STATUS REGISTER 
WORD COUNT REGISTER 
BUS ADDRESS 

DISK ADDRESS (DESIRED ADDRESS) 

DRIVE STATUS 

ERROR REG. 

ATTENTION SUMMARY 

LOOK AHEAD 

DATA BUFFER REGISTER 

MAINTENANCE REGISTER 

DRIVE TYPE REGISTER 



;INTERUPT VECTOR 
INTERRUPT PRIO. VECTOR 
ODD BYTE ADD FOR CSl 
ODD BYTE ADO FOR CS2 
ODD BYTE ADD FOR CM 
ODD BYTE ADD FOR BA 



: MEMORY MANAGEMENT REGISTER ASSIGNMENTS 

SR0=177572 

KIPAR0=172340 

KIPAR1=172342 

KIPAR2=172344 

KIPAR7=172356 

KIPDR0sl72300 

KIP0Rlsl72302 

KIPDR2=172304 

KIPDR7=r2316 

RU:b 

UP=00 



1AIN0£C-ll-DERS^-»^ 
DERSM.Pll 

1783 
1784 

1787 
1788 
1789 
1790 
1791 
1792 

1793 000001 

179M 000002 

1795 000004 

17% 000010 

1797 000020 

1798 000040 

1799 000100 
180C 000200 
IBCl 000204 

1802 000210 

1803 000220 

1804 000240 
1805 

1906 
1807 

1808 040000 

1809 100000 

1810 000100 

1811 000200 

1812 0C2000 
1613 010000 

1814 040000 

1815 100000 

1816 000200 

1817 020000 

1818 002000 

1819 040000 

1820 100000 

1821 001000 

1822 100000 

1823 000010 

1824 000100 



R3i.-=.£:3-cs:^ 5.^5IC FUhCTION 0Ifi:N3STIC 



N04 
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BIT ASSIGNMENTS FOR ERROR TYPEOUTS 
THE RS REGISTERS ARE DIVIDED INTO 3 



GROUPS. 

CS1.CS2 AND ER ARE IN THE FIRST GROUP. THIS CROUP IS ALWAYS 
TYP^O WITH EITHER OF THE OTHER GROUPS. AS.BA.Oft, WC AND D£ 
ARE IN THE SECOND GROUP. DT.D8,MR. AND LA ARE IN THE 3RD 
GROUP. YOU CAN NOT INTERMIX GROUP 2 OR 3. THEY HAVE 
TO BE TYPED SEPERATELY. 
EXAMPLE: HLT 'CSl.AS.BA 
HLT 'CSiIdtIdB 



CS1=1 

ER-2 

DA=4 

UC=10 

BA=20 

05=40 

AS=100 

052=200 

LA=204 

DB=210 

MR=220 

DT=240 



1 
2 



CONTROL AND STATUS 
CONTROL AND STATUS 
DESIRED ADD 
UORD COUNT 
BUS ADDRESS 
DRIVE STATUS 
ATTENTION SUMMARY 
CONTROL AND STATUS REG 
LOOK AHEAD 
DATA BUFFER 
MAINTENANCE 
DRIVE TYPE 



;BIT ASSIGNMENTS FOR THE REGISTER BITS 



TRE=40000 

SCrlOOOOO 

IR=100 

0R=2Q0 

PGE=2000 

NED=10000 

|4CE=40000 

DLT=100000 

DRY=200 

PIP=20000 

LBT=2000 

ERR=40000 

ATA=100000 

DA0=1000 

DCK=100QQO 

BAIslO 

IE=100 



TRANSFER ERROR CSl 
SPECIAL CONDITIONS CSl 
INPUT READY C52 
OUTPUT READY C52 
PROGRAM ERRQR-CS2 
NON-EXISTENT DRIVE CSS 
I4RITE CHECK ERROR-CSS 
DATA LATE ERROR CS2 
DRIVE READY OS 
POSITIONING IN PROGRESS OS 
LAST BLOCK TRRNSFER-DS 
ERROR OS 

ATTENTION ACTIVE-DS 
DISK OVERFLOW ERROR-ER 
DATA CHECK ERROR-ER 
BUS AODR INCREMENT INHIBIT 
INTERRUPT INABLE CSl 



32S 
836 
B2T 
928 
B2^ 
8X 
831 
532 
833 

93s 
936 

c37 
538 
539 

9Hi 

9-^3 

e% 
8ne 

8-^9 
?50 
8S1 

asa 
ass 

256 
857 
858 
9S9 
SbC 
861 
868 
863 
96H 
865 
B66 
867 



a:ii56 

XllbO 
0C1162 

001:6'* 

D0:i&6 
001170 
XI 172 



XIl7-«4 

x:i76 



Xi2X 

X1204 

X12Q6 
X1212 
X1220 
X1226 
X123H 
X1242 
X12S0 
X1256 
X1262 
X1266 
X1274 
CC1302 

xiaio 

0:i312 



i%723 
XOOX 

oooox 
oooooc 

XOOX 
XOOX 

oooox 
ocxx 

000004 
l72iX 
XXX 

xocx 



oooox 
oooox 

000000 

012Z5I 

012737 
012737 
012737 
012737 
012737 
012737 
005067 
005067 
0S?767 
012767 
232767 
X1402 
XC137 



EflSi: FJNCTICN DIOuNOSTIC 



ikORKiNG LOCATIONS 

RflW4U: 146723 

UNNUH: 0 

UNITSV: 5 

UNCflP: 0 

ONCEE: 0 

RSC4DT: 0 

TIflSV; C 

ApBi: 0 

«PRD=1721X 
BPORTT: 0 
SAVEC: 0 



805 



0005X 
02i0H0 
000340 
020470 
000340 
0214M0 
000340 
177516 
177^ 
143777 
024550 
0040X 

021736 



000024 
000026 
OOOOX 
00X32 
00X34 
000036 



177670 
1776X 
177654 



MAC/ll 27:732j Q6-0CT-76 09:S1 Ph;E Sh 



RANDOM NUneER PRinE 

UNIT CURRENTLY BEING TESTED 

SET BITsUNIT ON BUS 

FOR COMPRRINC FOR • OF DEvKE 

DID UE TEST ANY DRIVES 

CLR IF RS03 SET IF RS04 

SAVE LX FOR TIf€ 

PORT SUITCH 

URITE WRONG PARITY 

PARITY REG 

BUFFER AOOR FOR -B- PORT 
UORK LX 



;DI5CRIPTI0N OF ONCEE BITS 
81 TO NEANS FOUTC DRIVE 
BITil DO TKSa TEST 

BIT12 TYPE COULO NOT FIND NED ONLY ONCE 
;BIT13 TYPE NO HEN ON B PORT ONLY ONCE 
;BIT14 0- DO MCE WITH 0 -1 DO HCE WITH 1 
iBITlS NEANS ERROR FOIN) 

;RH11 UORK REGISTERS 
:(CAN BE CHANGED IN ANY ROUTINE) 
ilORK: 0 



UORKl: 
U0RK2: 

BEGIN: 



0 
0 

MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
CLR 
CLR 
BIC 
MOV 

Ul 

JMP 



iSX.SP 
•.P0&ER^t24 

i.HLT.StX 
i340.dt32 
i.TRAp,at34 
•34Q,8l36 

ICNT 
LAD 

•143777, ONCEE 
fOUTBUF.OBUFSV 

•bit:i,6ncee 

.+6 

2ITKSEL 



SET STACK TO »♦» SX »#* 
SET UP PF VECTOR 
LXK OUT T»C WORLD 
SE"^ EMT VECTOR 
LXK UP 

SET TRAP VECTOR 

LXK UP 

INIT ICNT 

INIT LAO 

CLEAR ONCEE 

SAVE LX OF OUTBUFFER 

X TKSEL TEST* 

NO 

YES 



DCRSAA.Pll 



13^ 
1869 
1B70 
1871 

187S 
187^ 
1877 



Rs::-RSC3-fiS04 basic functign diagnostic 



CDS 
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Q0i3ib icmoo 



1880 
1881 
1882 
1883 

jess 

1885 
1986 
1887 
1888 
188S 

:eqi 

i3S3 

.&% 
:e^7 
iB9e 

1900 

:90i 

1902 
1903 
1904 
190S 
190b 
1907 
1906 
1909 
1910 
1911 
1912 
1913 
1914 



001 
001 

SSi 

001?4Q 
001342 
0013% 
001350 

ooiasb 

001364 
001372 
001400 
001402 
001426 
Ci01494 
0014*4£ 
001444 
001452 
001460 
□01462 
001466 
001470 
X1476 
X1500 
QC1504 
OClSOb 
001514 
001516 
001524 
001526 
001534 
001542 
001544 
001552 
001554 
001564 
001564 
001570 
001572 
001576 
001604 



312701 
005077 



000770 
017767 
012767 
012767 
032767 
001015 
104402 
042767 
036767 
001%1 
016777 
022777 
001003 
005067 
000422 
022777 
001003 
005067 
000413 
022777 
001404 
022777 
001030 
052767 
032767 
00102 0 
032767 
001404 
104402 

0167% 
104406 
104402 
042767 
000473 



OOOCIO 
177556 
000007 



177540 

1775% 
C00401 



X1406 
lOOOOD 
177522 

177506 
000000 

177500 

000001 

177462 

000002 



1 1 I IIIK 



177777 

100000 

001560 

177366 

000040 
ICCOOO 



177416 

177H06 

177432 
176026 

177412 



;NOW TEST FOR DRIVES 

;TE5T 1 TEST FOR DRIVES 

tSTl: SCOPE 



177562 TRY: 



nULTII: NOV 
CLR 



177602 
177576 
177564 
176170 



177530 
177516 

177434 
177452 



177434 2S: 



MOV 
DEC 
BEO 
INC 
BR 

OVNUH; NOV 
MOV 
MOV 
BIT 
Bf€ 
TYPE 
BIC 

STTE5T: BIT 
BEQ 
MOV 
CMP 
BNE 
CLR 
BR 
CMP 
BNE 
CLR 
BR 
CMP 
BEO 
C?f 

arc 

BIS 
BIT 
BNE 
BIT 
BEQ 
TYPE 



3S: 



6S: 
IS: 



177360 



5S: 



4S: 



MOV 

TYPES 

TYPE 

BIC 

BR 



IB..R1 
9R5&S2 
•7.aRSER 
Rl 

OVNUM 

9RSCS2 

TRY 

aRSAS.UNITSV 

I401.1ICMP 

•O.LftlUM 

lBtT13,SUR 

STTEST 

iBITlS.ONCEE 

uncmp.Onitsv 

TRYNX 

UNNyN^aRSCS2 
2S 

RS040T 
IS 

tl.aRSOT 
3$ 

RS04DT 
II 

,aRSOT 



•3.aRS0T 

TRYfW 

i-l.RS040T 

•BltiS.SUR 

4S 

IBITlS.ONCEE 
5S 

..+2 

UNNUM,-(6) 

,40 

Ibitis.oncee 

NOMQO 



PUT B INTO Rl FOR COUNT 

SET DEVICE TO ZERO 

CAUSE AN ERROR ♦SETS BIT IN RSAS REG 

DO A MAXIMUM OF 8 TIMES 

TESTED FOR ALL DRIVES GET OUT 

INCREMENT DRIVE UNIT 

REPEAT FOR NEXT DRIVE 

SAVE 

SETUP TO CMP WITH UNITSV 
PUT 0 INTO UNIT NO. 
INHIBIT TYPE OUT' 
YES 

.ASCIZ <15><12>-TESTING UNIT - 
CLEAR ERROR FLAG 
IS THIS DRIVE ON THE SYSTEM 



_ • INTO CS2 
RS03' 



NO 

YES PUT UNIT 
IS THIS " 
NO 
YES 

GET OUT 

IS THIS A RS03 4U5' 
NO 

RS03 
GET OUT 

IS THIS A RS04' 
YES 

IS IT A RS04' 
GET A NEU NUMBER 

iNHIBf^TYPE OUT' 
YES 

ANY ERRORS' 

NO 

.ASCIZ <15><12><12> 



;PUT UNNUH ON STACK 

TYPE STACK IN OCTAL - SUPRESS 

TYPE SPACE 
(CLEAR ERROR FLAG 

NOW TEST 



P5i:-RS:3-RSG4 BASIC FuNC^ICS DI«GN0ST1C 
fOR CRIVES 



DOB 



1915 
191b 
1917 
1918 
1919 
1920 
1921 
1922 
1923 
192S 
192S 

1929 
IS30 
1931 
1932 
1933 
1934 
1935 
193b 
1937 
1938 
1939 
1940 
1941 
1942 
1943 
1944 
1945 
19% 
1947 
194B 
1949 
1950 
1951 
1952 
1953 
1954 
1955 
1956 
1957 
1958 
1959 
19bO 
1%1 
19b2 

il3 

1965 
196b 

1%7 
1%8 



OCibOb 
Xlbl2 
001614 
0CI620 

001622 
001630 
001632 

001652 
001654 
CC166Q 
001662 
001666 
001764 
001766 
001770 



001774 
002002 
002010 
002016 



002024 
002026 



002056 
002064 
002072 
002100 
002106 
CH32114 



002116 
002124 
Q02126 
002130 
002136 

002150 
002156 
002160 



30636^ 
i034C3 
005267 
000705 

032767 
M10S7 
012767 

001045 
0167% 
104406 
104402 
104402 

000402 
000167 



012767 
052767 
016767 
012767 



177336 

OOOOCl 

100000 
177312 
020000 

177276 

00004G 
001672 

016042 



024550 
000001 
016452 
000001 



177334 
177322 
175716 



TRYNX: fibL UNCflP 

BC5 CHCKOV 

INC UNNUn 

BR STTEST 

CHCKDV: Br •BITO.ONCEE 

B^€ DOfCE 

NOV 1100000, UNCMP 

CLR UNNUM 

BIT 181113. BUR 

BNE 4S 

MOV UNNUI1,-(b) 
TYPES 

TYPE ,40 

TYPE ,.+2 
HALT 

4S: BR NOUGO 

DOr€E: JnP DOTE 
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•.CHECK NEXT BIT FOR DRIVE 
; DID WE TEST ftNY REG' 
INC UNIT I 

; CHECK FOR NEXT DRIVE 



COULD NOT 
OEFftULTS 1 



SET 

0 



DID UE TEST fiNY DRIVES' 
YES UE DID TEST DRIVE 
NO DRIVES TESTED. 

INHiefT^^Y^ Otfp 
YES 

PUT UftWH ON STACK 

TYPE STACK IN OCTAL - SUPRESS 

TYPE SPACE 

.fiSCIZ <15><12> "COULD NOT FIND DRIVE UlLL TEST DRIVE 0 
WAIT 

TEST DRIVE 0 
GET OUT 



;THIS TEST IS DESIGNED TO TEST THE ABILITY OF RESET 
•TO CLEAR ALL THE RH Arc RS REGISTERS 



177100 
177154 
177152 
016442 



NOyGO: 



NOV 
BIS 
NOV 
hOV 



•OUTBUF.OBUFSV 
•BITO.O^E 



{SAVE LOC OF OUTBUFFER 
SET FOUND DRIVE FLAG 
SAVE TINE 
[OWLY TEST ONCE 

•TEST 2 RESET TEST FOR REGISTERS 



104400 






tST2: SCOPE 


012737 


000340 


177776 


HOV 


016777 


177116 


177044 


HOV 


012777 


177776 


177034 


NOV 


012777 


177777 


177034 


NOV 


012777 


177777 


177030 


HOV 


012777 


177777 


177026 


HOV 


012777 


177777 


177030 


NOV 


012777 


177777 


177002 


HOV 


012777 


177737 


176772 


HOV 


000005 






RESET 








;TEST RSCS2 Fl 


022777 


000100 


17b7b2 


CHP 


001401 






BEQ 


104200 






HLT 


016777 


177022 


17b750 


HOV 


022777 


010600 


176752 


CHP 


0Q1401 






BEQ 


li)4040 






HLT 






;TEST CONTROL 


022777 


004200 


176726 


CHP 


001401 






BEQ 


104001 






HLT 




•340.aiPS 

UNruAjRSCS2 
•1 77776 . r 
•177777, i 
•i77777,i 
•177777,3^5 
•1 77777 . aRSHR 

•1 77777 !i 

•17773?;; 



•loo.aRScss 

.♦4 

!CS2 

urfiun.8RSCS2 
•iobo6,aRSOS 

.♦4 
•05 

« STATUS REG 
•4200.9RSCS1 
.♦4 
!CS1 



jLOCK OUT INTERUPTS 

GET UNIT • 
;SET ALL 

POSSIBLE R/U 
;6ITS IN T)€SE REGISTERS 



; CLEAR ALL BITS IN ALL REG. 



010 THESE BITS GET CLEARED' 
YES 

(417) SHOULD BE CLEARED IN CS2 
PUT • OF UNIT IN TEST IN CS2 
IS OPR AND HOL SET' 

iS^HHY NOT' 

;DID THE READY BIT SET' 
YES 

READY SHOULD BE SET 



OERSftA.Pll TST2 



1%9 
1970 

1971 0021&2 

1973 gosm 

1973 002170 

1974 

197S 

1976 

1977 002172 
197B X2176 
1979 002200 
1960 
19ei 

lis 002202 
1994 00220b 
1915 002210 

1 

1989 002212 
1||0 008220 

1992 
1993 
1994 
1 

1997 002234 
199B 
1999 



005777 



005777 
0Q1401 
104004 



005777 
001401 
104002 



032777 



104010 



)1 002236 005777 

2002 002242 001401 

2003 002244 104100 



RS1]-R£C3-RS04 BASIC FUNCTION DIAGNOSTIC 
RESET TEST pQR REGISTERS 



EOS 



176724 



176716 



176712 



000077 176710 



177777 176656 



176660 



:TEST BUS ADDRESS REGISTER 



TST 
BEG 
HLT 



9RSBA 

.♦4 

!6A 



JEST DISK ADDRESS REGISTER 



TST 
BEG 
HLT 



3RSDA 

.♦4 

!0A 



;TEST ERROR REG RSER 



TST 
BEG 
HLT 



SRSER 

.♦4 

!ER 



;TEST RS MAINTENANCE REGISTER 



BIT 
BEQ 
HLT 



I77,9RSNR 

.♦4 

•NR 
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IS BA REG. CLEARED 
YES 

SHOULD BE 0 



;IS DA CLEARED 
;YES 

; SHOULD BE 0 



;0I0 RSER CLEARS 
YES 

;BITS( 157015) SHOULD BE CLEARED 



;DID THESE BITS GET CLEARED 
YES 

BITS(77) SHOULD BE 0 



;TEST UC REG IT SHOULD NOT CHANGE 



CNP 
BEQ 
HLT 

;TE5T RSAS 

TST 
8E0 
HLT 



•177777, aRSMC 

.♦4 

!UC 



SRSAS 

.♦4 

•AS 



;DI0 IT CHANGE? 
NO 

: RESET SHOULD NOT MODIFY RSUC 



;IS REG CLEAR 
YES 
;N0 



rt«INOCC-U-D£RSA-A 
OERSAA.PU TST3 



RSil-RSC3-RS04 BASIC FUNCTION DIAGNOSTIC 
TEST CLEAR SIT IN CS2 ON ALL THE R/U BITS 



FD5 
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200S 




2023 
2024 
2025 
2026 
2027 
c028 
2Q2<3 
2030 
2031 
2032 
2033 
2034 
2035 
203b 
2037 
2038 
203S 
2040 
2041 
2042 
2043 
2044 
2045 
20% 
2047 
2048 
2049 
2050 
2051 
2052 
2053 



0Q23b2 
002364 
002372 
002400 
002402 



002404 
002410 
002412 



002414 
002420 
002422 



002424 
002430 
002432 



002434 
002442 
002444 



002446 
002454 
002456 



0022% 104400 



i2737 
Ab777 
012777 
1 2777 
-12777 
012777 
1 2777 
12777 
012777 

022777 

016777 
032777 
001401 
104001 



000340 
176674 
043S76 
177777 
1 77777 
1 77777 
177777 
177777 
020417 

88884^ 
000100 



176566 
173577 



005777 176502 

001401 

104020 



005777 176474 

001401 

104020 



005777 176470 

001401 

104002 



032777 000077 

001401 

104220 



022777 177777 

001401 

104010 



;TEST 3 TEST CLEAR BIT IN CS2 ON ALL THE R/U BITS 

ltittftttfffttfftitiftt«tttffftfftfi*ftf«ff«f««ff«ft««t»tft«f»*««tf 
tST3: SCOPE 



177776 
176622 
176612 
176612 
176606 
176604 
176604 
176560 
176550 
176564 
176534 
176526 



176514 
176504 



TTACC: NOV •340.aiPS 

NOV UNNUn.9RSCS2 

NOV HSSTl-dRSCSl 

NOV •177m,aRSBA 

NOV §177777 aRSOA 

NOV 1177777 aRSER 

NOV 1177777 aRSDB 

flOV •177777'aRSUC 

NOV •20417.0IRSCS2 

NOV l71,3R§nR 

NOV t40!aRSCS2 

CNP •l0d,aRSCS2 

BEQ .+4 

HLT !CS2 

NOV UNNUnjRSCS2 

BIT 11735^7, aRSCSl 

BEQ .+4 

HLT • CSl 

;TEST BUS ADDRESS REGISTER 

TST aRSBA 

BEQ .«-4 

HLT !BA 

;TEST DISK ADDRESS REGISTER 

TST aRSOA 

BEQ .+4 

HLT !BA 

;TEST ERROR REG RSER 



TST 
BEQ 
K.T 



aRSER 

.+4 

!ER 



176466 



176434 



;TEST RS MAINTENAHCE.^STER 
BIT •77,aRSnR 
BEQ .+4 
HLT im 



;LOCK OUT INTERRUPTS 
GET UNIT • 
SET ALL 
POSSIBLE 
REGISTERS 



CLEAR ALL BITS 

DID THE RIGHT BITS CLEAR? 

YES 

(417) SHOULD BE CLEARED IN CS2 

GET DRIVE NUMBER 

DID ALL BITS GET CLEARED 

YES 

NO. ALL BITS SHOULD BE 0 



;IS BA REG. CLEARED 
YES 

; SHOULD BE 0 



;IS DA CLEARED 
YES 

•SHOULD BE 0 



;DID THESE BITS GET CLEARED 
•YES 

|BITS( 157015) SHOULD BE CLEARED 

iOIO THESE BITS GET CLEARED 
YES 

BITS(77) SHOULD BE 0 



;TEST HC REG. IT SHOULD NOT CHANGE 
— §177777, aRSWC 



CMP 
BEQ 
HLT 



.+4 
•UC 



;DI0 UC CHANGE 
NO 

UHY DID IT CHANGE? 



002460 lOMMOC 



ri5lNO£C-n-DERS(3-A 
C£RSfl«.PH TST4 



?05M 
2055 
2056 
2057 
2058 
2059 
20b0 
20fel 
2X2 
2-X3 

%5 



'"*ir 1 

>J72 
2Q73 

2075 
2076 
2077 
2078 
207*3 
2080 
2081 
2082 
2083 
2084 
2085 
208b 
2087 
2088 
208S 
2030 
2091 



Ct]2%2 
002HbH 
Q02H72 
002500 

OC2S06 

005530 
002532 
002540 
0025% 
002550 
Q02S52 



002554 
0025£>2 
0025&C> 
002574 
Q02S7S 



104414 
Dlb7b7 
012777 
022777 
001401 
104001 
012777 
022777 
001401 
104001 
012777 
022777 
001401 
104001 
1CS400 



012777 
005077 
022777 
001401 
1D4001 



002bQ0 104400 



RS11-RSC3-RS04 BftSIC FUNCTION DIftGNOSTIC 
SET AND CLEAR ALL REGISTERS 



G05 
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176500 
003576 
005776 



002524 
004724 



001052 
G0S2S2 



043576 
176316 
004200 




002640 
002644 



000005 

022777 000100 
001401 

021037 
022777 000137 
001406 

017700 176246 
012701 000137 
104000 



;TEST 4 SET AND CLEAR ALL REGISTERS 

;f «f««««fff«f ff««ff««««ff if fft«itf if ft«««fft«ft*«*ff«*««t«#«*tft««f 

TST4: SCOPE 

;CAN UE SET THE FUNCTION BITS IN THE R5CS1 REG. 
:BITS 7,6,5,4, 3. 2&1 



015774 
176404 
176376 



176364 
176356 



176344 
176336 



176322 
176310 



TST5: 



CLRDK 
NOV 
MOV 
CMP 
BEQ 
HLT 
MOV 
CMP 
BEQ 
HLT 
MOV 
CMP 
BEQ 
HLT 
SCOPE 



TIMSV, TIMES 
M3576 9RSCS1 
15776 3R5CS1 
.+4 
•CSl 

12524, aRSCSl 

•4724,3RSCS1 

.♦4 

•CSl 

11052, 3RSC51 
•5252 aRSCSl 
..+4 
!CS1 



; CLEAR THE FUNCTION BITS 



NOV 
CLR 
CMP 
8E0 
HLT 



•43576, aRSCSl 

SiralsRSCSl 

.+4 

!CS1 



CLEPR ALL RS REG 
GET TIME 

SET DISK FUNCTION BITS 
ARE TiCSE BITS SET? 
NO 

SHOULD = 3776 
SET THESE BITS 
DID THEY SET 
YES 

SHOULD 3E 2725 
SET THESE BITS 
ARE THEY s' 
YES 

SHOULD = 1252 



;S£T DISK FUNCTION BITS 

;IS THE RERDY BIT SET 
YES 

RSCSl SHOULD = 4200 



:ffffff«ffiffffffffffffffffffffffffffffffffffffifffff«ffffffffif«ffifffffi 

TEST 6 TEST RSCS2 

:ff«fff««»*«fiff»f«ff«ftf«ff«fffff«ff«ftfMft«f*fff«f«fff««««ff«««fff«ffffffff 

SCOPE 



tSTb: 



176274 



176262 
176254 



RESET 

CW 

BEQ 

HLT 

NOV 

CMP 

BEQ 

MOV 

MOV 

HLT 



il00,aRSCS2 
.♦4 

•21§37.aRSCS2 

•137,aAsCS2 

IS 

aRSCS2.BflD 
•137,g600 



; CLEAR UORLD 
DID THEY CLEAR' 
YES 
NO 

SET BITS 21017 
DID THESE BITS GET SET 
•YES 

;UHAT CS2 SHOULD = 

|CS2 = BAD GOOD = CORRECT ANS 



OERSM.PU TSTb 



RS11-RSC3-RSQ4 BASIC FUNCTION DIPGNOSTIC 
TEST RSCS2 



HOB 



2100 
2101 
2102 
2103 
210H 
2I0S 
?lOb 

a J 07 

2108 

eios 

2110 
2111 
2112 
2113 
2114 
2115 
211& 
21i7 
2119 
2119 
2120 
2121 
2122 
2123 
212S 
2125 
2126 
2127 
2128 
212S 
2130 
£131 
2132 
2133 
213H 
2135 
213& 
2137 
2138 
213<3 
2140 



002S% 
002S54 
002b62 
00266M 

oo2&e>& 

0D2t»7H 
002702 
00270H 
gg270b 

002720 
002726 
002730 
002732 
0027M0 



0027H2 
OG2750 
002756 
002760 
002762 
002770 
002776 
Q03000 
003002 
003010 
003016 
003020 



012777 
022777 
OOlMOl 
10420G 
012777 
022777 
001401 
10H200 

8iio77 
022777 
OOlHOl 
104200 
016777 
104400 



012777 
022777 
001401 
104020 
012777 
022777 
001401 
104020 
012777 
022777 
001401 
104020 



020025 
000125 



0C0012 
000112 



177777 
176166 
OOClOO 



176232 
176224 



176212 
176204 



176172 
176160 



176220 176146 



1 77777 
177776 



125252 
125252 



052524 
052524 



176142 
176134 



176122 
176114 



176102 
176074 



003022 104400 



TST7: 



HOV 
CMP 
BEQ 
HLT 

nov 
CUP 

BEQ 
HLT 
MOV 
CLR 
CflP 
BEQ 
HLT 
NOV 
SCOPE 



l20025.aRSCS2 

•125,SftSC52 

.♦4 

•CS2 

•12.3RSCS2 

•11^,9RSCS2 

.♦4 

!CS2 

•-l.aRSCS2 

aRStS2 

llC0,aRSCS2 

.♦4 

!CS2 

UNmjn,3RSCS2 



;CAN UE SET ALL THE RSBA BITS 

NOV #177777, 3RSBft 

CMP 1177776, 8RSBft 

BEQ .+4 

HLT !Bft 

MOV 1125252, 9R5BA 

CMP 1125252 aRSBR 

BEQ .+4 

HLT !BA 

NOV 152524, 9RS6R 

CMP 152524 aRSBR 

BEQ .+4 

HLT !BA 

TSTiO: SCOPE 

: FLOAT R 1 THROUGH RSBA 



003024 
003030 
003032 
003036 
003042 
003044 
0030% 
003050 
003052 



012701 
000241 
010177 
017700 
^100 
001401 
104000 
006101 
103367 



000002 

176054 
176050 



FLOTBR: 
IS: 



MOV 
CLC 
MOV 
MOV 
CMP 
BEQ 
HLT 
ROL 
6CC 



•2,G0OD 
GOOO.aRSSR 

srsbA.bro 
gooo,6ro 

.♦4 

GOOO 
IS 
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SET THESE BITS 

DID THESE BITS GET SET 

YES 

N0.CS2 SHOULD s 20125 

LOAO THESE BITS 

DID THESE BITS GET SET IN ^52 

YES 

BAD : CS2 GOOD s CORRECT ANS 

SET BITS 

CLEAR THEM 

DID CLEAR UORK 

YES 

R/U BITS DID NOT CLEAR 
GET UNIT t 



SET THE BITS 
DID THEY SET 
YES 

BITS 17776 SHOULD BE SET 
SET THESE BITS 
ARE THEY = 
YES 

SHOULD BE 125252 
SET THESE BITS 
ARE THEY = 
YES 

SHOULD SE 52524 



GET A 2 
CLEAR CARRY 
FLOAT NUMBER 
GET BA 
COMPARE BA 
BA CORRECT 

BAOsBA GOODsCORRECT AN. 
ROTATE NUMBER 
LOOP TILL DONE 



rWlNDEC-ll-DERSfl-fi 
DERSAA.Pll TSTb 



2IH1 

2i42 
21H3 
214M 

?:% 
e:-B 

2149 

2150 

2151 

2152 

2153 

2154 

2155 

2156 

2157 

2158 

2159 

2160 

2161 

2162 

2163 

2164 

2165 

2166 

^167 

2168 

2169 

2170 

2171 

2172 

2173 

217M 

2175 

2176 

2177 

2178 



0C3054 104400 



88^ m 



003074 
003076 
00310C 



0Q31Q2 
003110 
003116 

m§ 

0C3130 
Q03136 
003140 
C03142 
003150 
003156 
003160 
003162 



003164 
003170 
003172 
003176 
003202 
003204 
003206 
003210 
003212 



777 
077 
305777 
001401 
104020 
104400 



012777 
022777 
001401 

hm 

022777 
001401 
104010 
012777 
022777 
0C1401 
104010 
104400 



012701 
000241 
010177 
017700 
020100 
001401 
104000 
006101 
103367 



RSn-fi£C3-RED4 BASIC FUNCTION DIAGNOSTIC 
TE5' RSCSc 

TSTll: S^OPE 

: CLEAR THE RSBA REGISTER 



105 
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177777 
176022 
176016 



176026 



TST12: 



MOV 
CLR 
TST 
BEQ 
HLT 
SCOPE 



t 1 77777, aRSBA 

aRSBA 

aRSBA 

.+4 

!BA 



;SET RSBA EQUAL TO ALL ONES 

;TEST FOR BITO SET IN RSBA (READ ONLY SIT) 
YES 
NO 



;CAN UE SET ALL BITS IN RSUC REGISTER 



177777 
177777 



125252 
125252 



052525 
052525 



176000 
175772 



175760 
175752 



175740 
175732 



TST13: 



NOV 
CflP 
BEG 
HLT 
MOV 
CMP 
BEQ 
HLT 

nov 

CNR 
BEQ 
HLT 
SCOPE 



•177777, aRSWC 
•177777 aRSWC 
.+4 

•uc 

•125252, 9R5UC 
•125252 aRSUC 
.+4 
'UC 

•52525, aRSUC 
•52525 aRSUC 
>4 
!UC 



; FLOAT A 1 THROUGH RSUC 



000001 

175''12 
175706 



FLOTUC: 
IS: 



MOV 
CLC 
MOV 

nov 

CNP 
BEQ 
HLT 
ROL 
BCC 



•l.GOOO 

GOOO.aRSUC 
aRSu6.BA0 

good,6ad 

.♦4 

GOOD 
IS 



SET UC BITS 
ARE ALL BITS SET 
YES 
NO 

SET THESE BITS 
ARE THEY = 

YES 

SHOULD BE 125252 
SET THESE BITS 
ARE THEY s 
YES 

SHOULD BE 152525 



GET A 1 
CLEAR CARRY 
FLOAT NUrOER 
GET UC 
COHPRRE UC 
UC CORRECT 

BADsUC GOOOsCORRECT ANS 
ROTATE NUMBER 
LOOP Tia DONE 



I 



nAlNOEC-H-0£RSA-fl 
0£RSAA.P11 TSTb 



din 
HIBO 
2181 

im 

2i8S 

2195 

21% 

2187 

2198 

2189 

2190 

2l9i 

2192 

2193 

21^ 

2195 

21% 

2197 

21«j8 

21SS 

2200 

2201 

£202 

2203 

220M 

2205 

220b 

2207 

2208 

2209 

2210 

2211 

2212 

2213 

2214 

2215 



003214 104400 



8^^ 

005777 
001401 
104010 
104400 



312777 
022777 
001401 
104004 
012777 
022777 
001401 
104004 
012777 
022777 
001401 
104004 
104400 



012701 
000241 
010177 
017700 
020100 
001401 
104000 
006101 
I033b7 



M323Q 
C03234 
00323& 
003240 



003242 
003250 
003258 

003270 
D0327& 
003300 
003302 

003320 
003322 



003324 
003330 
003332 
003338 
003342 
003344 
003348 
003350 
003352 



RSn-R£03-R£04 BASIC PUNCTIQN DIAGNOSTIC 
TEST RSCS2 



JOB 



iCLEAR TH^ UORD COUNT REGISTER 
TST14: SCOPE 



177777 
175880 
175854 



177777 
177777 



125252 
125252 



052525 
052525 



000001 

175558 
175552 



175884 



TST15: 



nov 

CLR 
TST 
BEQ 
HLT 
SCOPE 



1177777, aRSWC 

afisuc 

9RSUC 

.♦4 

!UC 
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;SET RSUC REGISTER EQUAL TO ALL OTCS 

;DID ALL BITS GET CLEARED 
;YES 
NO 



;CAN UE SET ALL THE BITS IN THE RSDA REGISTER. 



175644 
175838 



175824 
175816 



175604 
175576 



NOV 
CMP 
BEQ 
HLT 
NOV 
CMP 
BEQ 
HLT 
MOV 
CMP 
BEQ 
HLT 

TST18: SCOPE 



•177777, aRSDA 
•177777 aRSDA 
.+4 
'DA 

•125252. 3RS0A 
•125252, aRSDA 
.+4 
'OA 

•52525, aRSDA 
•52525 aRSDA 
.♦4 
•DA 



; FLOAT A 1 THROUGH RSDA 
•l.GOOD 



FLOTDA: MOV 
CLC 

IS: MOV 
MOV 
CMP 
BEQ 
HLT 
ROL 
6CC 



GOOD.aRSDA 
3RS0A.BA0 

gooo,6ad 

GOOD 
IS 



SET ALL BITS 
ARE THE BITS SET 
YES 
NO 

SET THESE BITS 
ARE TI€Y = 
YES 

SHOaO BE 125252 
SET THESE BITS 
ARE THEY = 
YES 

SHOULD BE 52525 



GET A 1 
CLEAR CARRY 
FLOAT NUMBER 
GET OA 
COMPARE DA 
DA CORRECT 

BAO=DA GOODsCORRECT ANS 
ROTATE NUMBER 
LOOP TILL DONE 



WNOrc-lI-OERSA-fl 
DERSAA.Pil TSTb 



Rjii-f'SyS-RSOH BftSIC FUNCTION DIPGNOSTIC 
TEST R§CS2 



K05 



221b 
2217 

221 J 

2I2M 

2225 
2226 
2227 



2230 
2231 
2232 
2233 
223H 
2235 
2236 
2237 
2238 
223S 

2241 
2242 
2243 
2244 
2245 
22% 
2247 
2248 



C03354 104400 



84io77 
005777 
M1401 
104004 
104400 



i4 
003370 

883?7b 
003400 



177777 
175524 
175520 



iCfiN WE CLEAR THE RSDft REG. 
tST17: SCOPE 



175530 



flOV 
CLR 
TST 
BEQ 
HLT 

TST20: SCOPE 



•177777, aRSDfi 

3RS0A 
.+4 



;SET AND CLEAR THE RSER REG. 





UlCfff 


1 77777 

If f / f f 


1 7CC 1 n 


nn^u In 
UUJIIU 


no 3 7*7 
UCC( ft 


1 77n 1 7 

If fUlf 












003420 


104002 






003422 


112777 


000001 


175470 


003430 


022777 


000001 


175462 


003438 


001401 






003440 


104002 






003442 


104400 








012777 


052005 


175446 


8^ 


022777 


052005 


175440 


0034b0 


001401 






g034{)2 


104002 






003464 


10440G 






003466 


012777 


125012 


175424 


003474 


022777 


125012 


175416 


003502 


001401 






003504 


104002 







MOV 

CMP 

BEQ 

HLT 

MOVB 

CMP 

BEQ 

HLT 

TST21: SCOPE 



TST22: 



nov 

CMP 
BEQ 
HLT 
SCOPE 

MOV 
CMP 
BEQ - 
HLT 



•177777, aRSER 
•177017 BRSER 
.+4 
'ER 

•1, aRSER 
•1, aRSER 
.♦4 
!ER 



•52005, aRSER 
•52005 aRSER 
.+4 
•ER 



•125012, aRSER 
•125012, aRSER 
.♦4 
!ER 
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;SET RSOA TO ALL ONES 



;TE3T FOR ZERO RSDA 
;YES 

ANS SHOULD BE 0 



SET THESE BITS 
DID THEY SET 
YES 

RSER SHOULD = 157017 
A MOVB INST 

SHOULD MODIFY COMPLETE UO 
OK 



;SET THESE BITS 
•DID THEY SET 
•YES 

£R SHOULD = 52005 



;SET THESE BITS 
DID THEY SET 
YES 

ER SHOULD : 105012 



I 



fWINOEC-ll-OERSft-fi 
OERSM.Pll TST6 

22M<3 00350fc 10H400 



RSil-R£C3-RS0H BfiSIC FUNCTION DIAGNOSTIC 
TEST RSCS2 



LOB 



8^}? m {?i§k' '^"^ 

003S22 00S777 175372 
003S32 lO^HOO 



5261 a)5SM2 0177&7 



003S50 
003556 
003564 
003566 
003570 



2270 



2273 
227M 
2275 
2276 
2277 
C278 
2279 
2280 
2381 
2282 
2263 
228S 
2285 
22B6 
2287 
2288 



00360M 

OOSlM 
003616 

003620 
003626 
003634 
0036M2 
003630 
003652 
00365M 

003656 
003664 
003672 
003700 
003706 
003710 



042767 
022767 
001401 
104220 
104400 

^ 

032777 
001401 
104220 
104400 

012777 
017767 
042767 
022767 
001401 
104220 
104400 

012777 
017767 
042767 
022767 
001401 
104220 



000070 
175362 
177700 
000070 



000070 
175324 
000077 



000050 
175276 
177700 
000050 



000020 
175240 
177700 
000020 



175366 
175430 
175422 
175414 



17S330 
175316 



175302 
175344 
175336 
175330 



175244 
175306 
175300 
175272 



TST23: SCOPE 

NOV 
CLR 
TST 
BEQ 
HLT 

TST24: SCOPE 



•177017, aRSER 

3RSER 

aRSER 

.♦4 

!ER 



:SET AND CLEAR RStIR 



MOV 
MOV 
8IC 
CMP 
BEQ 
HLT 

TST25: SCOPE 

MOV 
CLR 
BIT 
BEQ 
HLT 

TST26: SCOPE 

MOV 
MOV 
BIC 
CMP 
BEQ 
HLT 

TST27: SCOPE 

MOV 
MOV 
BIC 
CMP 
BEQ 
HLT 



i70,aRSMR 

SRSftR.UORK 

1177700, WORK 

I70.U0RK 

.+4 

!MR 



«70,aRSMR 

3RsAR 

l77,aRSMR 

.+4 

•MR 



iSO.SRSMR 

aRSMR.UORK 

•177700, WORK 

•50. WORK 

,+4 

•MR 



•20,3RSMR 

srsAr.work 

«177760,W0RK 
•20, WORK 
.+4 
•MR 
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SET THESE BITS 
CLEAR THEM 
DID THEY CLEAR 
YES 

SHOULD = 0 



SET THESE BITS 

PUT INTO WORKABLE REG 

CLEAR JUNK 

DID THEY SET 

YES 

SHOULD = 70 



;SET BITS 

CLEAR THEM 
;DID THEY CLEAR 

YES 

•BITS (77) SHOULD = 0 
;SET BITS 

PUT IN WORKABLE REG 
{CLEAR JUNK 
DID THESE BITS SET 
YES 

•BITS (50) SHOULD BE SET 
;SET BITS 

PUT INTO WORKABLE REG 
CLEAR JUNK 
DID THEY SET 
•YES 

•MR SHOULD AT LEAST HAVE A (21) 



OERSM.Pll TST30 



MOB 

RS11-RS03-RS04 BASIC FUNCTION DIAGNOSTIC 
LOAD RANOOn NUMBERS INTO RSUC, RSDA AND RSBA 
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22OT 
2290 
2291 
2292 
2293 
229M 
2295 
22% 
2297 
2298 
2299 
2300 
2301 

im 

2304 
2305 
230b 
2307 
2308 
2309 
2310 
231 1 
2312 
2313 
2314 
2315 
231b 
23jr 
23i£ 
2319 
2320 
2381 
23«J2 
2323 
2324 
2325 
232b 
2327 
2328 
2329 
2330 
2331 
2332 
2333 
233S 
2336 
233b 
2337 
2338 
2339 
2340 
2341 



003712 
'14 



00372b 
003732 
00373b 
003744 
0^750 
0037S2 



0037b2 
0Q37b4 



003774 
00377b 
004000 
004002 
00400b 
004014 
004020 
004022 
004024 
004030 
004032 
004034 
00403b 
004042 
004044 
0040% 
004050 
004052 
00405b 
0040b4 
004070 
004072 
00407M 
004100 
004102 
00410b 
004110 
00HU2 
00411b 
004120 
004122 
004124 
00412b 
004130 



104400 

0127b7 
012701 
0045b7 
012704 
Ql27b7 
Qlt 



001413 
OlbTOS 
011415 
021524 
001771 
017700 
014401 
104000 
005724 
0007b3 
012704 
0127b7 
012703 
005303 
001413 
01b705 
011415 
021524 
001771 
017700 
014401 
104000 
005724 
0007b3 
012704 
0127b7 
012703 
00!S303 
00141b 
01b705 
011415 
042714 
021514 
0017b7 
017700 
011401 
104000 
000400 
005724 
0007bO 
000240 



;TEST 30 LOAD RANDOH NUMBERS INTO RSUC, RSDA AND RSBfi 

tST30: SCOPE 



024550 
0203bO 
024550 

003744 175044 
001000 



175130 



i7511b 



024550 

004014 174774 
001000 



1750b4 



175052 



024550 

0040b4 174724 
001000 



175012 
000001 

174774 



RANTS' 


MOV 




MOV 








MOV 


L'OPl* 


MQV 


NOV 


4S' 


DEC 








NOV 




MOV 




CMP 








MOV 




MOV 




HLT 




TST 

1^1 




BR 




MOV 




MOV 


L0P2: 


NOV 


3S: 


DEC 




BEQ 




MOV 




MOV 




CMP 




BEQ 

www 




MOV 




MOV 




HLT 




TST 




BR 


IS; 


MOV 




MOV 


L0P3: 


MOV 


3i: 


DEC 




BEQ 




MOV 




MOV 




BIC 




CMP 




BEQ 




MOV 




MOV 




HLT 




BR 


IS: 


TST 




BR 


2S: 


NOP 



•1000. WORK 

•OUTBUF.Rl 

R5, RANDOM 

i06TBUF.R4 

•LOPl.LftD 

•1000, R3 

R3 

IS 

R5UC,R5 
(R4) (R5) 
(R5),(R4)+ 
4$ 

SRSUC.BAD 
-(R4);G00D 

(R4) + 
4S 

•0UTBUF.R4 

•L0P2,lA0 

•1000 R3 

R3 

IS 

RSDA.RS 
{R4) (RS) 
(R5),(R4)+ 
3S 

SRSDA.BAO 
-(R4),G00D 

{R4)+ 
3S 

•OUTBUF.RH 

•L0P3,LM) 

•1000,R3 

R3 

2S 

RS8A,R5 

(R4).(R5) 

•BIT6.(R4} 

(RS),(R4) 

3S 

3RSBA.BAD 
(R4),G000 

IS 

(R4) + 
3S 



MAKE TABLE 1000 UOS LONG 
GET SRARTING LOC OF TflBLE 
GENERATE • 
SETUP FOR COMPARE 
SETUP LOOP ADDR 
LOAD TEST COUNTER 
DONE WITH COMPARE' 
YES 

GET UC ADDRESS 

LOAD UC 

IS IT CORRECT' 

YES 

GET BAD UC 
GET GOOD ANS 
TYPE THEM OUT 
UPDATE RANDOM NUMBER 
CONT 

GET STARTING LOC OF TABLE 
SETUP LOOP AOOR 
SETUP TEST COUNTER 
DONE YET' 
YES 

LOAD OA ADDRESS INTO R5 

LOAD OA 

IS IT CORRECT' 

YES 

GET BAD DATA 

GET GOOD DATA 

TYPE IT OUT 

UPDATE RANDOM NUMBER 

CONTINUE 

GET STARTING LOC OF TABLE 
SETUP LOOP ADOR 
SETUP TEST COUNTER 
DONE YET' 
YES 

LOAD ADDRESS OF BA INTO R5 

LOAD BA 

CLEAR BIT 0 

IS IT CORRECT' 

YES 

GET BAD DATA 
GET GOOD DATA 
TYPE IT OUT 
GET OUT 

GET NEU NUMBER 
CONTINUE 



«AINDEC-ll-D£RS«-fl 
OERSM.Pll TST31 



RS11-RS03-RS04 BASIC FUNCTION DIPGNOSTIC 



NOB 
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23M2 
|34M 



23M7 
23M8 



0CN132 104400 



004134 
00413b 

^ w 

2352 0041b2 

1^ Sffll^ 

23S5 004200 

1^ 004202 

23S8 004204 
23S9 

23b0 004206 

1^ ^214 

23b4 004232 

23Ci5 00423b 

|3bb 004242 

23b7 004244 

2368 00424b 
23b9 

2370 004250 
2371 

2372 004252 

2373 0042b0 

1^ m 

2376 004276 

2377 004300 
2376 00430b 

2379 004314 

2380 00431b 
2381 

2362 004320 
2383 

2384 004322 

2385 004330 
238b 00433b 

2387 004344 

2388 00434b 
238S 004350 

2390 QQ435b 

2391 0043b4 

2392 00436b 

2393 004370 



104414 
012777 

U 




1401 
104001 
112777 
022777 
001401 
104001 

104400 

01b777 
052777 
105077 
01b701 
052701 
017700 
020001 
001401 
104000 

104400 

012777 
112777 
022777 
001401 
104010 
112777 
022777 
001401 
104010 

104400 

012777 
112777 
022777 
001401 
104020 
112777 
022777 
001401 
104020 
104414 



T£ST ODD BYTE INSTRUCTIONS ON CSl, CS2, UC PND BR 

TEST 31 TEST ODD BYTE INSTRUCTIONS ON CSl, CS2, UC ftNO BA 

tST31: SCOPE 



0035bb 174740 
000005 174772 
0047bb 174724 



000032 174712 
004b32 174704 



174744 
177400 
174720 
174724 
000100 
I74b44 



025252 
000377 
177b52 



000125 
177524 



174672 
174664 



BITST: CLRDK 
MOV 

novB 

CMP 

BEQ 

HLT 

MOVB 

CMP 

BEQ 

HLT 

TST32: SCOPE 

8ITCS2: MOV 
BIS 
CLRB 
MOV 
BIS 
MOV 
CMP 
BEQ 
HLT 

TST33: SCOPE 



025252 


174630 BITUC: 


MOV 


000377 


174662 


MOVB 


177652 


174614 


CMP 






BEQ 






HLT 


000123 


174602 


MOVB 


177523 


174574 


CMP 




BEQ 






HLT 



174562 
174614 
174546 



174534 
174526 



TST34: SCOPE 

BITBA: MOV 
MOVB 
CMP 
BEQ 
HLT 
MOVB 
CMP 
BEQ 
HLT 
CLROK 



M3566.aR5CSl 

iS.SRSCSlB 

14^66, SRSCSl 

.+4 

•CSl 

•32.aRSCSl 
146^2, SR5CS1 
.+4 
•CSl 



UNNUM.3RSC52 

1177400, aR5C52 

3RSC52B 

UNNUM.GOOO 

1100.6000 

aRSC§2.BAD 

bad,go6d 

.♦4 



t25252.3RSUC 
I377.SRSUCB 
•177^52, SRSUC 
.+4 

ll23.aRSUC 
•177^23, SRSUC 
.+4 
•UC 



•25252.aRSBA 

I377.3RSBAB 

1177^52, SRSBA 

.+4 

!Bfl 

•125.aRSBA 

il77§24,SRSBfl 

.+4 

!BA 



; CLEAR ALL RS REG 
;L0AD CSl 
;L0AD BIT 

DID IT LOAD' 

YES 



;CS1 SHOULD = 4632 



LOAD UNIT NUMBER 
LOAD ALL BITS 
CLR UPPER BYTE 
GET UNIT NO. 
SET OR BIT 
GET CS2 

IS CS2 CORRECT^ 
YES 

LOAD BYTE DID NOT UORK 



;LOAD UC 
;LOAD BIT 
DID IT LOAD? 
•YES 

•NO UC SHOaO S177652 



;UC SHOULD = 177523 



;LOAB DA 
LOAD BIT 
DID IT LOAD? 
YES 

DA SHOULD S177652 



;BA SHOULD = 177525 
•CLEAR ALL RS REG 



BQE) 




2y» 

2M51 



1^ 

esio 

2S12 
2Si3 
2^14 
2M15 
2sib 



7S 
004*432 
004-10 

0044Jb 

0Q4444 
044% 

0044^ 



004462 

m 

004474 
00447b 



012777 

SiIt^i 



001371 
Ig^ 

020100 
001401 
104CJ0 
0!2701 
017700 
020100 
X1401 
104000 



BmSIC FUNCTI:^^ DlfiCNOSTIC 
'E 1NST»?UCTI0NS ON CSl. CSS. UC AND 



"^5135: SCOPE 
ZERCfC: C^RDK 



174524 
177777 






CLR 


17451b 
174562 




nov 
nov 
flOV 


174530 






SIS 


174454 




2S: 


HOV 
C«P 
BEO 


17453b 




3S: 


OcC 
BNE 
HLT 
CLR 


1 7UUC3 






nuv 
CMP 
BEQ 
HLT 


177777 






nov 


174H34 






nov 

CHP 
BEO 
HLT 



3R50B 

il77777.aR50B 

■2000. u6rk 

•300.&00D 

UNNUri.GOOD 

aRSCSi.BAD 

GOOD, BAD 

31 

WORK 

2S 

ICS2 

GOOD 

8RS0B.BA0 

G000.6AD 

.♦4 

■-I.GO00 
9RS66.BA0 
G000.6AO 
.♦4 



nfiC^ 11 27.752) Cb-0CT-7b D8: = i Ph'^E fc7 
BA 



•.CLEAR ALL R5 REG 
;LOAD DB UITH ALL 0 
:L0A0 OB WITH ALL ONES 
;''in£ OUT ROUTINE 
:GET CORRECT FOR C£2 

GET CS2 

IS IT CORRECT' 

YES 

TO UAIT FOR OR 
TO SET 

OR SHOULD BE SET 

LOAD BAD UITH DB 
IS BAD CORRECT 
YES 

COULD NOT FLOAT 0 THROUGH DB 
LOAD GOOD UITH ANS 
GET DATA FROM DB 
IS DB CORRECT 

YES 

BAD SHOULD s 1777777 



2h20 

2H31 
2S32 
2S33 

3435 

a43b 

2437 
2M38 
243S 
2MH0 

2442 
2443 
2444 



004500 10H40C 



004502 
004504 
004512 




0045H2 
004544 
0045% 
004552 
004S5H 
Q0455C> 
304564 
004566 
004570 
004574 
004576 
004600 
004606 
004610 
00%12 
004620 
004622 



104414 

012767 

013777 

213777 

5lg777 

032777 

001401 

104001 

005777 

001401 

104002 

022777 

001401 

104010 

005777 

001401 

104004 

023777 

X14C1 

104020 

C36777 

0C1401 

104100 



RSii-RSC3-RS04 BASIC FUNCTION OlfiGNCSTIC 
TEST NO-OP FUNCTION 



COb 
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177777 
0 01102 

oooogi 
000001 



174346 
177777 
174320 
001102 
174344 



:«t*ft«ft*«t««»«#*f»ft«t*f«««Mft«ttffft«tf»««*f»fffftftff«*t««tMtf «»#**«#»##»*««» 

;TEST 36 TEST NO-OP FUNCTION 

tST36: SCOPE 



020036 
174372 
174362 
174350 
174342 



174324 

174304 
174302 



NOOP: 



CLROK 

nOV §177777, OUTBUF 

NOV 8tOBUFS{'.9RSBA 

«0V «-1.5R3H£ 

NOV tl.iRSCSl 

BIT fl'aRSCSl 

BEQ M 

HLT !CS1 

TST SRSER 

BEO .+4 

HLT lER 

CNP t-l.aRSHC 

BEQ .+4 

HLT !UC 

TST aRSOfi 

BEO .^4 

HLT !0A 

CNP aiOBUFSV.aRSBfl 

BEQ .*H 

HLT !Bfl 

BIT UNCNP.aRSAS 

BEO >4 

HLT !flS 



CLEAR Aa RS REG 
DATA TO BE XFERED 
SET UP CURRENT ADDRESS 
LOAD VC UITH -1 
DO NO-OP FUNCTION 
DID CO BIT CLEAR 
YES 

GO BIT SHOULD BE CLEARED 
DID ANY ERRORS OCCURR^ 
NO 

ALL ERROR BITS SHOULD BE 0 
DID UC nOVE^ 

NO 

UC SHOULD s 1777777 

DID DA NOV 

NO 

DA SHOULD sQ 
DID BA HOVE 
NO 

BA nOVED 

AS SHOULD NOT SET ON 
A NO-OP FUNCTION 
AS SET UHYV 



nfllNOEC-lI-DERSA-A 
OERSflft. PH TST37 



00%?« lOHOC 



2455 



00%% 



00%50 
00M6S8 
00%64 
00%72 
Q0M7QP 
0047% 

004720 
004722 
004724 
004732 
0Q4734 
004736 
004742 
004744 
0047% 
004754 
0C475fc 
0047M 
0047Sb 
004770 
004772 
005000 
005002 



104414 

012757 
013777 
012777 
Olf 




JlMOl 
104040 
022777 
001401 
104010 
005777 
001401 
104004 
023777 
001401 
104020 
038777 
001001 
104100 
022777 
001401 
104002 



RSil-R£C3-RS04 BASIC FUNCTION DlflGfiOSTIC 
TEST NO-OP FUNCTION UITH ERROR BITS SET 



DOE) 
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000007 
174320 



177777 
001102 

vrrm 

000001 
000001 



150500 
177777 
174152 
001 '.'2 
174176 
000007 



174262 
174256 



017672 
174226 
174216 
174204 
174176 



174176 
174156 

174136 
174134 
174120 



: •rcT rrer ua ab p-ikjATTAu iittu risBAB ftrr^ reT 



TEST 37 



TEST NO-OP FUNCTION UITH ERROR BITS SET 



tST3r: SCOPE 



NNOOP: CLROK 

nov 

BIT 
BNE 
HLT 

NOV 
NOV 
NOV 
NOV 

an 

BEQ 
HLT 
CNP 
BEQ 
HLT 
CNP 
BEQ 
HLT 
TST 
BEQ 
HLT 
CNP 
BEQ 
HLT 
BIT 
BNE 
HLT 
CMP 
BEQ 
HLT 



•7.aRSER 

UNCMP.SRSAS 

.♦4 

'AS 

1177777, OUTBUF 
aiOBUFSV.aRSSA 

•-i.aRSuc 

il.ilRSCSl 
ll.dRSCSl 
.♦4 
•CSl 

•150600, aRSOS 

.♦4 

!D5 

«-i,aRswc 

.♦4 

!UC 
SRSDA 
>4 
'DA 

aiOBUFSV.aRSBA 

.♦4 

'BA 

UNCMP,aRSAS 

.♦4 

'AS 

i7-aRSER 

.♦4 

!ER 



CLEAR ALL RS REG 
LOAD ER 

IS ATA BIT SET' 

aI^BIT should be SET 

DATA TO BE XFERED 

SET UP CURRENT ADDRESS 

LOAD UC UITH -1 

DO NO-OP FUNCTION 

DID GO BIT CLEAR 

YES 

GO BIT SHOULD BE CLEARED 

DID ERR BITS SET' 

NO 

ERR BIT SHOULD BE 0 

DID UC MOVE' 

NO 

UC SHOULD = 1777777 

DID DA NOV 

NO 

OA SHOULD =0 
DID BA nOVE 
NO 

BA NOVED 

AS SHOULD BE SET 

IS IT' 

NO 

DID ER CHANGE' 
NO 

ER SHOULD NOT CHANGE 



r«irOEC-H-0ERSfl-fl 
DERS^.Pll TST40 



0Q50W 104H00 




2SCN 
2S05 
2506 
2507 
2508 
250S 
2510 



iloo 

005102 

"lis 

005114 
005Ub 
005124 



005136 
005140 



1401 
104010 
005777 
001401 
104004 
K3777 
0014C1 
104020 
036777 
001401 
104100 
022777 
001401 
104040 



RSii-RSC3-RS04 BASIC FUNCTION DIAGNOSTIC 
TEST NO-OP FUNCTION CODE 21 
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177777 
001102 
177777 
000021 
000001 



174042 
177777 
174014 
001102 
174040 
004220 



;TEST 40 TEST NO-OP FUNCTION CODE 21 

tST40: SCOPE 



017532 
174066 
174056 
174044 
174036 



174320 

174000 
173776 
173746 



N00P2i: CLRDK 

flOV 1177777, OUTBUF 

nOV aiOBUFSV.SRSBA 

NOV a-i.aRSuC 

MOV •2l!aRSCSl 

BIT ll.tlRSCSl 

BEQ >4 

HLT !CS1 

TST aRSER 

BEO .+4 

HLT !ER 

CMP l-l.aRSUC 

BEO .♦4 

HLT !WC 

TST aRSOA 

BEO .♦4 

HLT !Dfl 

CMP atoeuF5v,aRSBfl 

BEO .+4 

HLT !Bfl 

BIT UNCNP.aRSAS 

BEQ .+4 

HLT !flS 

CUP 14220. aRSCSl 

BEO .'^4 

HLT !DS 



CLEAR ALL RS REG 

DATA TO BE XFERED 

SET UP CURRENT ADDRESS 

LOAD UC UITH -1 

DO NO-OP FUNCTION 

DID GO BIT CLEAR 

YES 

GO BIT SHOULD BE CLEARED 
DID ANY ERRORS OCCURR' 
NO 

ALL ERROR BITS SHOULD BE 0 

DID HC flOVE' 

NO 

UC SHOULD = \777T77 

DID DA NOV 

NO 

DA SHOULD -0 
DID BA nOVE 
NO 

BA riOVEO 

AS SHOULD NOT SET ON 
A NO-OP FUNCTION 
AS SET HHY' 
IS CSl CORRECT' 
YES 

CSl SHOULD = 4220 



FOb 



1AirCEC-ll-D£RSA-t^ 
DERSflfl.PU TSTHl 



lOMMOO 



RSil-RSC3-RS04 BASIC FUNCTION DlfiGNOSTIC MflCYll 27(732) 

TEST NO-OP FUNCTION CODE 21 WITH ERROR BITS SET 
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104M14 
012777 
036777 
001001 
lOHlOO 
0127b7 
013777 

i!~ 

032777 
001401 
104001 
2777 
__1401 
104040 
022777 
1401 
104010 



023777 

(322777 
1301401 
104002 
02277 7 
001401 
104040 



000007 
174002 



177777 
0 01102 
177777 
000021 
000001 



iSObOO 
177777 
173&34 
001102 
173660 
000007 
104220 



TEST Ml TEST NO-OP FUNCTION CODE 21 WITH ERROR BITS SET 

TST41: SCOPE 



173744 
173740 



01 7354 
173710 
173700 
173S66 
173660 



173660 
173640 

173620 
173616 
173602 
173554 



NN0P21: CLRDK 
I10V 
JIT 
3NE 
HLT 
MOV 

nov 

10V 
10V 
3IT 
3EQ 
HLT 
CUP 
3EQ 
tl 

:vp 

3EQ 
*.T 
TST 
BEQ 
HLT 
CMP 
8E0 
HLT 
BIT 

SCf 

CMP 
BEQ 
HLT 
CMP 
BEQ 
HLT 



•7.aRSER 
UNCMP.SRSAS 
.♦4 
I PS 

•177777, OUTBUF 
SlOBUFS^'.aRSBA 
i-l.aRSWt 

•silaRscsi 

ll.^RSCSl 

.♦A 
•CSl 

1150600, aRSDS 

.+4 

•OS 

t-i,aRsuc 

.+4 

!UC 

3RS0A 

.♦4 

'OA 

9tOBUFSV,aRSBfl 

.♦4 

!Bfl 

UNCMP.aRSAS 

.♦4 

!AS 

•7,aRSER 
'ER 

1104220, SR5C51 

.♦4 

!DS 



CLEAR ALL RS REG 
LOAD ER 

IS ATA BIT SET' 
YES 

AS BIT SHOULD BE SET 
DATA TO BE XFERED 
SET UP CURRENT ADDRESS 
LOAD UC WITH -1 
DO NO-OP FUNCTION 
DID GO BIT CLEAR 
YES 

GO BIT SHOULD BE CLEARED 

DID ERR BITS SET' 

NO 

ERR BIT SHOULD BE 0 
DID MC MOVE' 

NO 

WC SHOULD = 1777777 

DID DA MOV 

NO 

OA SHOULD :0 
010 BA MOVE 
NO 

BA MOVED 

AS SHOULD BE SET 

IS IT? 

NO 

DID ER CHANGE? 
NO 

ER SHOULD NOT CHANGE 
IS CSl CORRECT? 
YES 

CSl SHOULD s 104220 



OERSflfi.PlI T5T42 



00533S 10440C 



R5n-R£C3-RS0M WSIC FUNCTION DIftGNOSTIC 
TEST DRIVE CLERR FUNCTION UITH ERRORS SET 



GOb 
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2S58 
2S5S 
2560 
25&1 
2S62 
25b3 
SSbH 
25b5 
SSbb 
2Sb7 
2588 
2%9 
2570 
2571 
2572 
2573 
257H 
2575 

2578 
257S 
2580 
2581 
2582 
2583 
2S8M 
2585 
258& 
2587 
2588 



005336 
0053S0 



0053b2 
005370 
005376 
005402 
005H06 
005H12 
005M16 
005H20 
005H22 
005M24 

0KH32 
005H3H 



005HMM 



005466 
005470 
005472 
005500 



005504 
005512 
005514 
005516 
005524 
005526 



104414 
012777 
012777 
012777 
012777 
012777 
017700 
042700 
016701 
052701 
020100 
001401 
104000 
005777 
X1401 
104004 
00S777 
001401 
104002 
017767 
,»7 

001401 
104220 
022777 
001401 
104001 
036777 
001401 
104100 
022777 
001401 
iCSOiO 



177777 
177777 
177017 
000070 
000011 
173504 
177640 
173544 
000100 



173464 
173460 



173460 

1777^7 



004210 
173452 
177777 



;TEST 42 TEST DRIVE CLEftR FUNCTION UITH ERRORS SET 

tST42: SCOPE 

; FIRST SET ALL R/U BITS IN DISK REG 
00 DRIVE CLEAR-ALL R/U BITS SHOULD BE CLEARED 



173542 
173540 
173536 
1735M0 
173506 



DRCLR: 



173526 
173520 
173512 



173404 
173410 
173364 



CLRDK 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

BIC 

MOV 

BIS 

CMP 

5EQ 

HLT 

TST 

BEQ 

HLT 

TST 

BEQ 

HLT 

MOV 

BIC 

CMP 

BEQ 

HLT 

CMP 

BEQ 

HLT 

BIT 

BEQ 

HLT 

CMP 

BEQ 

HLT 



1177777, aRSUC 

•177777 3RSDA 

•177017 ISRSER 

•70,8R5Ar 

•ll.SRSCSl 

8R5(S2.BAD 

•177646.BflD 

UNNUM.GOOD 

•100, GOOD 

GOOD BAD 

.+4 

SRSDA 

.+4 

!DA 

3RSER 

.+4 

'ER 

SRSMRJJORK 

•177767, UORK 

•70.U0R^ 

.+4 

!MR 

•42lO,aRSC51 

.+4 
•CSl 

UNCMP,aRSA5 

.+4 

'AS 

•177777, 3RSWC 

.+4 

!UC 



CLEAR ALL RS REG 

LOAD RSUC 

SET ALL POSSIBLE 

BITS IN DISK REG 

SET THESE BITS 

SET DRIVE CLEAR 

GET CS2 DATA 

CLEAR JUNK 

GET DRIVE UNIT 

SET IR BIT 

IS UNIT • THE SAME 

YES 

UNIT • IN C52 GOT MODIFIED 

DID OA CLEAR 

YES 

OA SHOULD BE 0 
DID ER CLEAR 
YES 

ER SHOU<.D BE CLEARED 
GET MR REG 
CLEAR JUNK 

IS 70 STILL SET IN MR' 
YES 

BITS 70 SHOULD NOT CLEAR 
DID THESE BITS CLEAR? 
YES 

CSl SHOULD =4210 
AS SHOULD NOT SET 
ON A DRIVE CLEAR FUN 
WHY DID AS SET' 
DID RSUC CHANGE' 
NO 



lAIfCeC-ll-OERSfl-i^ 
OERSflA.PU TST42 

2590 
2SS1 
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HOb 
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2593 
2594 

S« 
25% 

2597 

2596 

2599 

2bO0 

2b01 

2C>02 

2b03 

2bOS 

2605 



005E30 lOHMOO 



0127&7 
013777 
012777 
012777 
022777 
1)01401 
104010 




0Q560S 
OOSblO 

005b24 
005626 
005632 
005634 
005642 
005644 
0056% 
005654 
005656 
005660 
005664 
005666 
005670 
005676 
005700 
005702 
035706 
005712 
005716 
005720 
005722 
005724 
005730 
00573H 
005740 
005742 
005744 
005746 
005752 
005754 



104020 
05 2777 
105777 
100001 
104001 
004767 
104001 
022777 
001401 
104004 
022777 
001401 
104047 
005777 
001401 
104010 
022777 
001401 
1040H4 
016701 
052701 
017709 
020100 
001401 
104000 
017700 
D13701 
062701 
020100 
001401 
104000 
005777 
001401 
10H040 



177777 

177777 
0 00060 
177777 



001102 



000001 
173262 



016424 
000001 

004260 

173224 

010600 



173250 
000100 
173170 



173162 
0C1102 
000C02 



173146 



;00 ONE UURO URITE 

TEST 43 EXECUTE THE ONE UORO MRITE 

tST43: SCOPE 



017006 
1733H2 
173332 
173320 
173316 



173306 
173266 

173252 
173230 

173220 



URTST: 



IS: 



2S: 



3S: 



4S: 



CLRDK 

NOV 

MOV 

NOV 

MOV 

CMP 

BEO 

HLT 

CMP 

BEQ 

HLT 

BIS 

T5TB 

BPL 

HLT 

JSR 

HLT 

CMP 

BEQ 

HLT 

CMP 

BEQ 

HLT 

TST 

BEQ 

HLT 

CMP 

BEQ 

HLT 

NOV 

BIS 

MOV 

CMP 

BEQ 

HLT 

MOV 

MOV 

ADD 

CMP 

BEQ 

HLT 

TST 

BEQ 

HLT 



•177777, OUTBUF 
SIOBUFS^'.SRSBA 
l-l,3RSUC 
t60,3RSC51 

i-i.aRsuc 

.♦4 
' wc 

aiOBUFSV,5R5BA 

.♦4 

!BA 

IBITO.SRSCSI 

SRSCSi 

.+4 

•CSl 

PC.WAITRY 
!C§1 

ll.SRSOA 

.+4 

!DA 

•H260,aRSCSl 
.+4 

!CS1!ER!0S!DA 

aRSuc 

.♦4 
'UC 

•1060O,aRS0S 
.*H 

!DS!OA 

UNNUM.GOOD 

•100.6000 

8R5C§2.BAD 

GOOO.BAD 

.♦H 

3RSBA.BAD 

aiOBUFSV.GCOO 

I2.G000 

go6d,bad 

.+4 

9RSER 

.+H 

!DS 



CLEAR ALL RS REG 

DATA TO BE X-FERED 

SET UP CURRENT ADDRESS 

SET UORO COUNT TO -1 

SET FUNCTION UITH NO GO BIT 

DID UC MOVE^ 

NO 

WC MOVED 

DID RSBA MOVE? 

NO 

BA MOVED 
SET GO BIT 
TEST FOR ROY=0 
ROY=0 

ROY SHOULD = 0 
WAIT FOR READY 

SHOULD = 260 RDY NEVER CAME UP 
IS RSOA CORRECT 
RSOA OK 

SHOULD = 1 SHOULD INCREMENT 

IS ERROR FLAG SET? 

NO! X-FER OK 

ERROR DURING X-FER 

FETCH UORO COUNT 

UORD COUNT DID OVERFLOW 

SHOULD = 0 FAILED TO INCREMENT 

IS RSOS OK? 

YES 

NO 

GCT UNIT • 
SET IR BIT 
GET CS2 

IS CS2 CORRECT? 
YES 

BAD = CS2 GOOD IS CORRECT ANS 

GET 3A DATA 

UHAT RSBA SHOULD EQUAL 

UPDATE OUTBUFFER 

IS RSBA CORRECT 

YES 

BA FAILED TO INCREMENT 
DID AffT ERRORS SET? 
NO 



•^AlNDEC-lI-OERSfl-A 
DERSAfl.Pii T5T43 



2SMM 
2S45 

«.4? 
2648 
2849 
2850 
2851 



005758 lOHHOC 



2854 




008010 

006020 
00602S 
^l6 
008034 

0060M0 
0060% 
008050 
006052 
006 05 6 
008080 
006062 

006072 



008102 
006104 
006110 
006114 
006120 
006122 
006124 
006126 
008132 
006136 
008140 
008142 



001401 
1040% 
022777 
001401 
10H043 
005777 
001401 
104010 
018701 
052701 
017700 

104000 
17700 
13701 
062701 
020001 
001401 
104000 
018700 
012701 
020100 
001401 
104000 



8 
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177777 
000071 
173Q70 



018232 
000001 

004270 

173032 



173070 
000100 
173010 



173002 
D01102 
000002 



018418 
177777 



TEST 44 EXECUTE THE ONE UORD READ 

SCOPE 



tST44: 
RD7ST: 



173116 
173106 
173074 



173080 
173038 



IS: 
2S: 



3S: 



4S: 



CLRDK 

CLR 

MOV 

MOV 

MOV 

TSTB 

BPL 

HLT 

JSR 

HLT 

CMP 

BEQ 

HLT 

CMP 

BEQ 

HLT 

TST 

BEQ 

HLT 

MOV 

BIS 

MOV 

CW> 

BEQ 

HLT 

MOV 

MOV 

ADD 

CMP 

BEQ 

HLT 

MOV 

MOV 

CMP 

BEQ 

HLT 



OUTBUF 

aiOBUFSV.SRSBA 

i-l,3RSUC 

I71.9RSCS1 

3RS6S1 

.♦4 

•CSl 

PC.WAITRY 
'Cbi 

iBITO.SRSOA 
.+4 

!DA!ER!DS 
14270, 3RSCS1 
.♦4 

!C51!ER!D5 

3RSUC 

.+4 

•WC 

UNNUH.GOOO 
•100.6000 

ansc^.BAO 
GooD.aAo 

.♦4 

aRSBA.BAO 

SIOBU^SV.GOOO 

I2.G000 

ba6,gooo 

.♦4 

OUTBUF-BAD 
t-l.GOOD 
G006,BA0 
.♦4 



CLEAR ALL R5 REG 
CLR TO READ INTO 
SET UP CURRENT ADDRESS 
SET UORD COUNT TO -1 
GO READ 

TEST FOR BUSYsl 
BUSY SET 
BUSY NOT SET 
UAIT FOR READY 
TIWEQUT ROY DID NOT SET 
UAS RSDA INCREMENTED BY 1 
RSDA OK 

RSDA SHOULD CONTAIN A 1 
IS ERROR FLAG SET' 
NO! X-FER OK 
RSC51 SHOULD s 270 
TEST UC 

UORD COUNT DID OVERFLOU 
SHOULD - 0 
GET CORRECT 
ANS OF CS2 
GET C52 

IS CS2 CORRECT? 
YES 

GOOD = CORRECT ANS FOR CS2 

FETCH CUnSNT ADDRESS 

UHAT RSBA SHOULD EQUAL 

UPDATE IT 

IS RSBA CORRECT 

YES EXECUTE CONTINUE 

RSBA FAILED TO INCREMENT 

GET DATA READ FROM DISK 

GET CORRECT ANS 

IS OUTBUF CORRECT 

YES 

GOOD=CORRECT ANS BAD^DATA READ FROM DISK 



MAINDEC-n-OERSA-fl 
DERS««.P11 TST45 



2692 
Sb83 



2687 



0061H4 104M0C 



2(>% 
2691 
26% 
2693 
2694 
2695 



00615b 
0061 
0061 




2706 
2707 

2708 
2709 
2710 
2711 
2712 
2713 
2714 
2715 
2716 
2717 
2718 
2719 
2720 



006250 



006262 
006264 
006270 
006272 



006304 
006310 
006312 
006314 



'04414 
012767 
013777 
012777 
012777 
105777 
100001 
104001 
004767 
104001 
016701 
052701 
017700 
020100 
001401 
104000 

g2777 
1401 
104046 
K2777 
001401 
104004 
005777 
001401 
104010 
017700 
013701 
062701 
020001 
001401 
104000 



RSil-RSC3-RS04 BASIC FUNCTION DIAGNOSTIC 
TEST WRITE CHECK 



JOb 



nftCYll 27(732) 06-0CT-76 08:51 PAGE 75 



:«ft«««««««««««ft«««««f««t««Wt»««««»fM*i«i«f«««««fiii««M«M«M«f4f «««*««* 

;TEST 45 TEST WRITE CHECK 

:«*«««t«ft*«««»«i«ft«««i»ftf««fttit«tft«t«fttftt««fi««««ftft«#««f if iff ff>f §««««»» 

tSTMS: SCOPE 

; DO A ONE WORD WRITE CHECK 

:» * «EX£CUTE THE ONE WORD WRITE CHECK! » t 



177777 
001102 
177777 
000051 
172700 



016042 

172734 
000100 
172654 



004250 
000001 
172620 



172612 
001102 
000002 



016372 
172726 
172716 
172704 



URCKT: 



IS: 
2S: 



172636 
172634 



CLRDK 
MOV 
MOV 
MOV 
MOV 
TSTB 
BPL 
HLT 

RSWCWT: JSR 
HLT 
flOV 
BIS 
MOV 
CMP 
BEQ 
HLT 
CMP 
BEQ 
HLT 
CMP 
BEQ 
HLT 
TST 
BEQ 
HLT 
MOV 
MOV 
ADD 
CMP 
BEQ 
HLT 



2S: 



3S: 



1177777, OUTBUF 
9I0BUFS^.3R56A 
•-l,aRSW6 

•5i!aRscsi 
aRs6si 

.+4 

!CS1 

PC.WAITRY 
'CSl 

ur<Nun.G00D 

tlOO.COOD 
aRSC§2.BA0 

goco,bAo 

.+4 

•4250,aRSCSl 
.♦4 

!0fl!ER!D5 

•BITO.aRSOA 

.+4 

!0A 

aRSWC 

.+4 

'UC 

aRSBA.BAO 

aiOBU^SV.GOOD 

•2.G00D 

Bfl6.G00D 

.44 



CLEAR ALL RS REG 
DATA TO BE X-FERED 
SET UP CU'^RENT ADDRESS 
SET UORD COUNT TO -1 
GO WRITE <"MECK 
TEST FOR KcADY 
NOT READY 
BUSY FAILED TO SET 
WAIT FOR READY 
BUSY FAILED TO CLEAR 
GET UNIT • 
SET BIT IR 
GET CS2 

IS CS2 CORRECT' 
YES 

GOOD = CORRECT ANS FOR CS2 

AMY ERRORS^ 

X-FER OK 

ERROR DUR X-FER 

WAS OAR INCREMENTED BY 1 

RSOA OK 

OAR SHOULD - 1 

TEST FOR OVERFLOW 

WORD COUNT DID OVERFLOW 

SHOULD = 0 

FETCH CURRENT ADDRESS 

WHAT RSSfl SHOULD EQUAL 

UPDATE IT 

IS RSBA COffi^CT 

YES EXECUTE CONTINUE 

RSBA FAILED TO INCREMENT 



CERSflft.Pll 


TST45 


2721 


00b3lb 


01 b'b7 


2722 


006324 


0i27b7 


2723 






272S 












2726 






2727 






2728 


00b332 


104400 


i 272S 






2730 


00b334 


• nULI f LI 

104414 


2731 


00b33b 


005(a74 


2732 


00b340 


Oc04b7 


2733 


00b344 


001001 


273M 


00b3% 


005204 


2735 


00b350 


012767 


273b 


00b35b 


013777 


2737 


00b3b4 


012777 


2738 


00b372 


012703 


273S 


0Qb37b 


016705 


27H0 


0Qb402 


012701 


27M1 


0Gb40b 


010461 


27H2 


00b412 


000240 


27H3 


00bm4 


010561 


27HM 


006420 


A 4 AA • t 

010311 


2745 


00b422 


004767 


27% 


006426 


t All AA 1 

104001 


2747 


0064X 


022777 


2748 


006436 


001401 


2749 


006440 


1 1 All ^ 

104047 


2750 


006442 


022777 


2751 


006450 


AA 4 iin t 

0014Q1 


2752 


006452 


1 Ai i A At I 

104004 


2753 


006454 


005777 


2754 


006460 


AA 4 1 1 A 1 

001401 


2755 


006462 


104010 


27Sfc 


006464 


022777 


2757 


006472 


AA 4 II A t 

001401 


2758 


006474 


1 All AilU 

104044 


2759 


0064^ 


016701 


27b0 


006502 


052701 


27b 1 


006506 


A 4 T"VAA 

017700 


27b2 


006512 


OcOlOO 


27b3 


006514 


001401 


27bM 


006S16 


104000 


2765 


006520 


017700 


27bb 


006524 




27b7 


006530 


062701 


27b8 


006534 


020100 


27bS 


006536 


001401 


2770 


006540 


104000 
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1725b0 
024550 



172612 



177777 
001102 
177777 
OOOObl 
172554 
172040 
000010 

000010 

015b30 

004260 



000001 
172430 
010600 



172454 
000100 
172374 



172366 
001102 
000002 



172650 
172550 



NXfl: flOV OBUFSV.BPORTT ;SflVE -B- PORT BUFFER 

nOV •OUTBUF.OBUFSV ; RESTORE 0BUF5V 

; DESELECT THEN SELECT UNIT NUMBER IN RSCS2 CHECK TIMING 

TEST 4b DESELECT THEN SELECT UNIT NUMBER TIflING TEST 

tST46; SCOPE 



UNITST: CLRDK 
CLR 



01bl72 
17252b 
17251b 



3S: 



IS: 



17244b 
172444 

172424 



CMP 
3NE 
INC 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
NOP 
MOV 
MOV 
JSR 
HLT 
CNP 
6EQ 
HLT 
CMP 
BEO 
HLT 
TST 
BEQ 
HLT 
CMP 
BEQ 
HLT 
MOV 
BIS 
MOV 
CMP 
BEQ 
HLT 
MOV 
MOV 
ADD 
CMP 
BEQ 
HLT 



R4 

R4,UNNUM 

3$ 

R4 

il77777, OUTBUF 
anOBUFS^'.aRSBA 

i-i,aRsuc 

«bl,R3 
UNNUM.RS 
•1720^0, Rl 
R4,10(Ri) 

R5,10(R1) 
R3 (Rl) 
PClWfllTRY 

•cSi 

•42bO,9RSCSl 
.♦4 

!CS1!ER!DS!0R 

•l.SRSOA 

M 

!0A 

aRSUC 

.♦4 

!UC 

•lObOO.dRSOS 

.♦4 

'DS.'OA 
UNNUH.GOOO 
fl00.600D 
aRSC§2.BAD 

gooo,bAo 

.+4 

aRSBA.BAO 

aiOBUFSV.GOCD 

•2.G00D 

&060,BAD 

.♦4 



CLEAR ALL RS REG 
CLEAR R4 

IS THIS CORRECT UNIT «' 
NO THEN USE IT 
GET WRONG DRIVE 
DATA TO BE X-FERED 
SET UP CURRENT ADDRESS 
SET WORD COUNT TO -1 
GET WRITE FUNCTION 
GET CORRECT UNIT M 
GET CSI REG 

LOAD WRONG UNIT • INTO CS2 
WAIT FOR DRIVE TO SETTLE 
LOAD CORRECT UNIT • 
LOAD FUNCTION IN CSI 
WAIT FOR READY 

SHOULD = 2bO RDY NEVER CAME UP 

IS ERROR FLAG SET' 

NO! X-FEP OK 

ERROR DURING X-FER 

IS RSOA CORRECT 

RSDA OK 

SHOULD = 1 SHOULD INCREMENT 

FETCH WORD COUNT 

WORD COUNT DID OVERFLOW 

SHOULD = 0 FAILED TO INCREMENT 

IS R50S OK? 

YES 

NO 

GET UNIT I 
SET IR BIT 
GET CS2 

IS CS2 CORRECT' 
YES 

BAD s CS2 GOOD IS CORRECT ANS 
GET BA DATA 

WHAT RSBA SHOULD EQUAL 
UPDATE OUTBUFFER 
IS RSBA CORRECT 
YES 

BA FAILED TO INCREMENT 



«.QINOEC-U-DERSfl-fl 
OERSflfl.PH TSTSb 



L06 
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;TEST CURRENT ADDREl 

•DO fiONE WORD WRITE fiND 



S INHIBT'BRI IN RSCS2 



;IF RSBfl INCREMENTED AFTER THE X-FER 
TEST 47 TEST Bfil IN RSCS2 



006542 


104400 






tST47: 


SCOPE 


006544 


104414 






BfllTST: 


CLRDK 


006546 


013777 


001102 


172336 




MOV 


006554 


012777 


177777 


172326 




MOV 


006562 


052777 


000010 


172316 




BIS 


006570 


012777 


000061 


172306 




MOV 


006576 


004767 


015454 






JSR 


006602 


104001 








HLT 


006604 


013701 


001102 




IS: 


MOV 


006610 


017700 


172276 






MOV 


006614 


020100 








CMP 


006616 


001401 








BEQ 


006620 


104000 








HLT 


006622 


005777 


172272 






TST 


006626 


001401 








BEQ 


006630 


104040 








HLT 


006632 


104414 








CLRDK 


006634 


032777 


000010 


172244 




BIT 


006642 


001401 








BEQ 


006644 


104002 








HLT 



atOBUFSV.aRSBR 

•-1.3RSWC 

»BAt.3RSCS2 

•61,2lRSCSl 

PC.WfllTRY 

'CSl 

atOBUFSV.GOOD 
3R5BA.BP6 
GOOD.BRD 
.+4 

aRSER 

.+4 

!0S 

•BflI,9RSCS2 

.+4 

!ER 



CLEAR ALL RS REG 
SET UP CURRENT AODR 
SET WORD COUNT TO -1 
SET BAI BIT 
WRITE 

WAIT FOR READY 
RDY DID NOT SET 
WHAT R5BA SHOULD BE 
WHAT RS6A IS 
COMPARE 
YES 

BAD=OUTBUF GOOD = CORRECT ANS 

ANY ERRORS' 

NO 

YES 

CLEAR ALL RS REG 
DID BAI CLEAR' 
YES 

BAI DID NOT SET 



^i^INDEC-U-DERSfl-« 
OERSfiA.Pll TST50 



2799 

2800 

2601 

2802 

2803 

280M 

280S 

280b 

2907 

2809 

2BQS 

2810 

2811 

2812 

2813 

2814 

2815 

2816 

2817 

2018 

2819 

2820 

2821 

2922 

2823 

2824 

2825 

2828 

2827 

2928 

2829 

2830 

2631 

2832 

2633 

2834 

283S 

2836 

2637 

2638 

2639 

2640 

2841 

2842 

2843 



006b4& 104400 



006&50 
00€.fe52 

nos&bo 

OObbbb 
00bfe74 
U0b702 
00b710 
006714 
006716 
006722 
006726 
006732 
006734 
006736 
006740 
006746 
006750 
006752 
006760 
006764 
0D6770 
006774 
006776 
007000 



104414 

052777 

012777 

012777 

012777 

012777 

004767 

104040 

016701 

052701 

017700 

020100 

001401 

104000 

022777 

001401 

104001 

012777 

017700 

016701 

052701 

020100 

001401 

104200 



007002 104400 



007004 
007006 
007014 

007030 
007034 
007042 
007044 
007050 
007052 



104414 
012777 
013777 
012777 
005067 
032777 
001004 
005367 
001371 
104220 



RS11-RS03-RS04 BftSIC FUNCTION DlflGNOSTIC 
TEST NON-EXISTENT MEMORY ERROR BIT IN CS2 



nfiCYU 27(732) 06-0CT-7b 08:51 PflGE 78 



000010 
177777 
173000 
000077 
001471 
015342 

172234 
004310 
172154 



145670 



040000 
172122 
172166 
000310 



000032 
001102 
177777 
172144 
001000 

172130 



!t»«««««Mft«*ftft«fi««ft««««««««»ftftftf «««»»««««««»»»««««««««««««««««««#««««««« 

;TEST 50 TEST NON-EXISTENT MEMORY ERROR BIT IN CSS 

tSTSO: SCOPE 



172226 
172222 
172216 
172232 
172174 



172136 
172124 



NXMTSM: CLROK 
BIS 
MOV 
MOV 
MOV 
MOV 
JSR 
HLT 

TSTNEH: MOV 
BIS 
MOV 
CMP 
BEG 
HLT 
CMP 
BEQ 
HLT 
MOV 
MOV 
MOV 
BIS 
CMP 
BEQ 
HLT 



MBAI.3RSCS2 

H-I.JRSWC 

«1 73000. SRSBfi 

l77.aRS6fiE 

«147l.aRSCSl 

PC.WfllTRY 

!0^ 

UNNUM.GOOO 
I4310!gOOD 
SRSCS^.BAO 
GOOD, BAD 
.+4 

1145670, 3RSC51 
.♦4 

JCSl 

iTRE.SRSCSl 

3RSC§2.Bfl0 

UNNUM.GOOD 

1310, &00D 

GOOD, BAD 

.+4 

!CS2 



CLEAR PLL RS REG 

SET BAI BIT 

SET UP WORD COUNT 

SET UP CURRENT ADDRESS 

AND EXTENDED BITS 

READ AND LOAD A1& 4A17 FOR IB BIT ADDRESS 

WAIT FOR READY 

READY NEVER CAME UP 

GET UNIT NO. 

SET BAHOR BITS 

GET CS2 

IS CS2 CORRECT' 
YES 

BAD=CS2 GOODsCORRECT ANS FbF CS2 

DID TRE SET' 

YES 

TRE SHOULD SET BECAUSE OF NEH 
CLEAR TRE 
GET CS2 
GET DRIVE 
SET IR 

IS C52 CORRECT' 
YES 

CSc-Bfif' GOOD IS CORRECT ANS FOR CS2 



TEST 51 TEST BLOCK SEARCH FUNCTION, PIP AND DRY BIT AND ADDR. 

tSTSl: SCOPE 



CONF BIT 



172100 
172070 
172060 

172066 4S: 



BLOCK: CLROK 
MOV 
MOV 
MOV 
CLR 
BIT 
BNE 
DEC 
BNE 
HLT 



i32.9RS0A 

SlOdUFSV.SRSBA 

i-l.aRSW6 

uorI^ 

•1000,9RSMR 
3$ 

WORK 

4S 

!MR 



CLEAR ALL RS REG 

00 A SEARCH FOR SECTOR 32 

LOAD REGS. TO MAKE 

SURE THEY DO NOT CHANGE 

SETUP FOR TIMEOUT ROUTINE 

WAIT FOR DISK TO 

REACH SECTOR 32 

TIME OUT 

ROUTINE 

COULD NOT FIND SECTOR 32 



RS11-RSC3-RS0M BASIC FUNCTION DIAGNOSTIC 



NOB 



0ER3OP.P11 


TST51 


TEST BLOCK SEARCH FUNCTION, 




rm7ncu 


005077 


i t CU J~ 




3S: 




3QUC 


nnTfitn 

UUr UoU 


012777 


UUUUJi 


1 ' CUiD 




1 JU V 


co^b 




032777 


nnnsnn 

UUUcUU 


1 7pnpp 

i ' CUCC 




PTT 
Oi 1 


30U7 
COT'' 


nn7n7u 


001402 








OCw 


30UQ 


nn7n7t 
Uui'LVo 


104040 








riL 1 


3DUQ 


nn7t no 


000500 






IC' 
is. 


on 


cdsU 


UUr iUc 


032777 


nsnnnn 

UCUUUU 


1 ( CUUD 


BTT 


cobl 


UU' 1 lU 


001001 








DDL 


cobc 


Uuf llz 


104040 








HI T 




UUr I IT 


012701 


npnnnn 

UCUUUU 








1 3CCU 


nn7 1 on 

Uuf icU 


005301 






PC> 




, cabb 


nn7i 33 
UUr ice 


00l4Sb 










—□so 


nn7i pu 

UUr iC~ 


032777 


nnn?nn 

UUUCUU 


1 7 1 7M 




BTT 

Oi 1 


PCC7 


UUr 1 JC 


001772 








Bro 


coba 


nn7 1 "iu 

UUi' 1 


022777 


liUOUU 


1 7 1 7CU 
If If 3~ 








nri7 1 UP 

UUr i*tC 


001401 








BFO 


COOU 


nn7 1 uu 

UUr 1^1 


104040 








Ml T 


coo i 


UU/ ito 


022777 


! nup^n 

iU^COU 


At if dU 






cooc 


nn7icu 

UU' Ion 


001401 










-ODJ 


UU' ibo 


104041 








Ml T 


COCT 


UUr IdU 


01b7&7 


1 7 1 77P 
If If r C 


i7PniP 




nuv 


coos 


nn7 1 cc 
UU' ibo 


005001 








r; R 


COOD 


nfi7i 7n 

UU' i r U 


0002bl 








9b w 


— Oor 


nn7i 73 

UUr i ' C 


OOblOl 








RHI 


COoO 


no? I 7u 

UUr i r " 


005767 


i r CUUU 






1 O 1 


coo J 


UUr^CUU 


001403 








BPQ 


Cor U 


UUr CUc 


005367 


if If rC 








CO' 1 


UU' cuo 


000771 








BR 
on 


PP7P 

Cur C 


>JU' CiU 


020177 


ir I'UD 




CMP 

wl Ir 


COf J 


nn73iti 

UU< Ci^ 


001403 








BFO 


'3Q7U 


UU' CiD 


017700 


1 7 1 7nn 

if If UU 






MOV 


.0' 3 


no7PPP 
UU' ccc 


104000 








HLT 


: QTt 
C<= 0 


nri/PPM 

UU /CC^ 


010177 


1 7 1 f.7P 
if lO' c 




71' 


NOV 


Co <^ 


JU' C<3U 


005777 


1 7 1 CtCC 
Ir ioDD 






TQT 


COr 0 


UU' co^ 


001401 










CO' i 


UU' CaO 


104100 








HI T 




UUr C^U 


022777 


UiUDUU 


1 7 1 f«cn 




CMP 


COOl 


UU' C~D 


001401 








BFQ 


Co jC 


UU' C3U 


104040 








HLT 


?AP'3 


UU' DC 


023777 


nni in? 

UUl iUC 


171f»3P 

1 ' IwwC 




CMP 


C(»1~ 


■ -1 


001401 










1 coos 




104021 








HLT 


2§3E> 


WW ■ » W 1 


J22777 


177777 


171616 




CMP 


2887 


007272 


001401 








BEQ 


2888 


Lw727H 


104010 








HLT 


2889 


00727& 


000401 








BR 


28S0 


007300 


104040 






TTMOUT: 


HLT 


2891 


007302 








OOUT: 





SRSDA 

i31,SRSCSl 

vORY.aRSOS 

IJ 

IDS 

OOUT 

120000, 3R5DS 
.♦4 

!DS 

120000, GOOD 

GOOD 

TTMOUT 

lDRY,aRSD5 

2J 

•110600,aRS05 

.+4 

!05 

1104230, 3RSCS1 
.♦4 

ICSliDS 

UNNUt1,U0RK 

GOOD 

GOOD 
UORK 
6S 

UORK 
5S 

G000,aRSOS 
7S 

SRSAS.BAO 

GOOD.aRSAS 
aR5A§ 
.+4 
'AS 

»10&00,aR5DS 
.+4 

!D5 

aiOBUFSV.BRSBA 
.+4 

!CS1!BA 

t-l.aRSUC 

.♦4 

!UC 

OOUT 

!DS 
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NOU SEARCH FOR 0 

DO A BLOCK SEARCH FUNCTION 

IS DRY CLEARED' 

YES 

DRY SHOULD BE CLEARED DURING A BLOCK SEARCH 
GET OUT BECAUSE OF TIMING 
IS PIP SET' 
YES 

PIP SHOULD BE SET 

SETUP FOR TIMEOUT ROUTINE 

DO TIMEOUT 

TIMED OUT 

DID DRY SET' 

NO 

DID PIP CLEAR' 
YES 

PIP BIT DID NOT CLEAR 

DID SC SET? 

YES 

SC DID NOT SET 
GET CORRECT AS BIT 
IN RSAS REG 
THAT SHOULD 
BE SET 



; IS RSAS CORRECT' 
YES 
•NO 

CLEAR AS REG 
DID IT CLEAR' 
YES 
NO 

DID ATA CLEAR' 

YES 

NO 

DID BA MOVE' 
NO 

BA MOVED WHY' 
DID UC MOVE' 
NO 

MC MOVED WHY' 
DONE GET OUT 
DYR NEVER CAME UP 
DONE 




0C7X2 ICH-*aC 



016767 
012767 
lOHMlH 



1?}? _ _ . 

291B 007MOO 



8 

Q01S12 

010077 
042700 




o 

001401 




n 007412 
S 0C7M14 
2S23 007416 

007426 




2S2^ 

2530 0074% 

2531 0074S0 
?J32 007452 
?533 007456 

2534 007462 

2535 007466 
2936 007470 
2*337 007472 



001401 
104043 
0ZZ777 
001401 
104043 
017700 
016701 

^100 
001401 
104000 
016701 
042701 
017700 
020001 
001401 
104100 



-';=C3-R£C4 basic function DISiNo'IC 
:^^£-^^ FJNCTION CODE TEST CODE 3 TO 51 



B07 
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011156 
000010 

024464 



0 01102 
177777 
171532 
000001 

171520 

104200 
171506 



000001 

ISObOO 

171452 
171516 
000100 



171504 
177400 
171434 



TEST 52 ILLE&AL FUNCTIOh CODE TEST CODE 3 TO 51 



tST52: SCOPE 

TEST ILF BIT I.N R5ER AND ERR BIT IN RSDS 

ALSO CHECKS TO SEE IT UC.BA, OR DA GOT flOOIFIEO 

IF UI5HING TO LOOP ON OfC FUNCTION ONLY. LOAD 

FUNCTION INTO LOCATION lUTAB: AND 0 IN FOLLOWING LOCATION 



171656 
311146 



17155c 
171542 



ILL51: 



iS: 
35: 



2S: 



6S: 



4S: 



171506 
171472 



flOV 

MOV 

CLRDK 

MOV 

MOV 

BEQ 

MOV 

MOV 

MOV 

8IC 

MOV 

TSTB 

BPL 

BIS 

MOV 

CMP 

BEQ 

HLT 

CW 

BEQ 

HLT 

vMP 

BEQ 

HLT 

nov 

MOV 
BIS 
CMP 
BEQ 

HLT 
MOV 
BIC 
MOV 
CMP 
BEQ 
HLT 



TIME5.TIMSV 
•lO.TiMES 

IILLTAB.R3 

(R3)*,BAb 
ILFDN 

8I0BUF5V.SRS6A 
•-1,SRSU6 
BA0.8RSCS1 
tBitO.BAD 

6ad.g6oo 

SRSdSl 
6S 

•104200, GOOD 

3RSCS1.§A0 

GOOD.BAD 

•l.SRSER 

.+4 

•CSliER.'OS 
•150600, aRSDS 
.♦4 

!CS1.»ER!DS 
aRSCS2.BAD 
UNNUM.&OOO 
•It^.&OOO 
GOOD BAD 

UNCMP.COOD 

•177460.GOOO 

9RSAS.BA0 

bad.g6oo 

.♦4 
•AS 



SAVE LOOP COUNT 

LOOP TEN TIMES 

CLEAR ALL RS REG 

GET STARTING ADO OF TABLE 

GET ILL FUN 

DOf€ GET OUT 

SET UP REGS. 

TO CHECK FOR CHANGE 

DO ILLEGAL FUNCTION 

CLEAR GO BIT 

MOV ILLEGAL FUN INTO GOOD 

ROv SET» 

NO 

SET ERROR BITS 
PUT CSl INTO BAD 
IS CSl CORRECT^ 
YES 

GOOD IS UHAT 
DID ILF SET' 
YES 

ILF DID NOT SET 
IS OS GOOO^ 
YES 

m DID WT SET 

GET CS2 

GET UNIT i 

SET IR BIT 

IS CS2 CORRECT' 

YES 

GOOD = CORRECT ANS FOR CS2 

GET CORRECT DRIVE 

CLEAR UNUANTEO BITS 

GET RSAS REG 

DID CORRECT UNIT ANSWER' 

YES 

NO WRONG DRIVE ANSWERED 



CSl 



SHOULD =SAD=CS1 



D£RSflfl.Pll TST52 



RS:i-fiSC3-RSCN BASIC FUNCTION DIAGNOSTIC 
ILlESAL function code test code 3 TO SI 



007 



4. flu 



2973 



29« 

mi 

29S3 



0C7M7M 023777 001102 
QOTSQg SOIHOI 
00750H 

c 101401 



cm 



I If*-" ^- 




177777 



I7im0 
17137M 



7 171370 



171362 



77? 004200 171334 



177S46 




024526 



177777 
1 71364 
177707 
171254 
000001 

171242 

144200 
1712X 




007736 017700 



000060 
000050 

171144 



171306 
171276 

171356 



171230 
171214 



171256 
171246 



ILFON; 



CNP aiOBUFSV.SRSBA 

BEO .♦4 

HLT !CS1!BA 

CNP l-l.aRSUC 

BEO .♦4' 

HLT 'CSIIUC 

TST aRSOA 

BEO .•^4 

HLT !CS1!DA 
CLRDK 

TST 8RSER 

BEO .44 

HLT IDS 

CNP »4200,aRSCSl 

BEQ .+4 

HLT !DS 

J 3S 
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010 BA HOVE 
NO 

BA flOVED ON AN ILLEGAL FUNCTION 
DJO HC HOVE' 

UC nOVEO 
DID DA nOVE 
NO 

DA NOVED 
CLEAR ALL ERRORS 
DID ERRORS CLEAR 
YES 

ILF DID HOT CLEAR 

DID ERRORS IN CSl CLEAR 

YES 

CONTINUE UNTIL DOrC 
DONE WITH ILLEGAL FUNCTION TEST 



;TEST ILF BIT IN RSER AND ERR Bit IN RSOS 
ALSO CHECKS TO SS IF yC.BA, OR DA GOT NOOIFIED 
IF WISHING TO LOOP ON ONt FUNCTION ONLY, LOAD 
FUNCTION INTO LOCATION ILFTB2: AND 0 IN FOLLOWING LOCATION 

:Cl£AR ALL RS REG 

•IL5TB2.R3 
(R3)^,bA0 
2f 

ILFDNE 

SlOBUFSV.aRSBA 



IlLFUN: CLRDK 
IS: 
3S: 



2S: 



lOS: 
6t: 



NOV 
NOV 
BEQ 
JHP 
MOV 
NOV 
MOV 
6IC 
NOV 
BIC 
NOV 
TSTB 
BPL 
BIS 
NOV 
CNP 
BEO 
HLT 
CNP 
BEQ 
K.T 
CNP 
BEO 
HLT 
TST 
BEQ 
HLT 
CNP 
BEQ 
CMP 
BEQ 
;U0RKls70 
MOV 



BAO^UORKl 
•17MJ7.H0RK1 
BAO.aRS^Sl 
iBlto.BAO 

bao.g6od 
aRs6si 

6S 

•1442Q0.G000 
aRSCSl.dAO 

good.bAd 

.♦4 

ll^aRSER 

!CS1*S!DS 
•150600, aRSOS 
.44 

!CS1!ER!DS 

9RSDA 

.♦4 

!CS1!0A 
I60,U0RK1 

lis 

|5Q,U0RK1 
7S 

8RSCS2,BA0 



GET TABLE OF ILL FUNS. 
GET ILL FUN 
00 THIS FUNCTION 
DONE GET OUT 
SET UP REGS. 
TO CHECK FOR CHANGE 
SHOULD UE TEST 
BA AND UC 

DO ILLEGAL FUNCTION 
CLEAR GO BIT 

MOV ILLEGAL FUN INTO GOOD 

ROY SET' 

NO 

SET ERROR BITS 
PUT CSl INTO BAD 
IS CSl CORRECT' 
YES 

GOOD IS UHAT CSl SHOULD rBAD=CSl 

DID ILF SET' 

YES 

ILF DID NOT SET 
IS DS GOX' 
YES 

ERR DID NOT SET 
DID DA MOVE' 
NO 

DA MOVED 

IS THIS AN ILL i4RITE FUN' 
YES 

IS THIS AN ILL URITE CHECK FUN' 
YES—BRANCH 

GET CS2 



'«ir€eC-ii-0ERS.5-« 



0lb701 



RSil-RSC3-R£04 BASIC FUNCTION DIftONOSTIC 
lLt£GA». FUNCTION CODE TEST CODE 3 TO 51 



D07 



17121D 
QOllOO 




3006 
3009 
3010 
3011 
3012 
XI3 
3014 
3015 
Xlb 
3G17 
3018 
3019 
3020 
3021 
3022 
3023 
3024 
302S 
302b 
3027 
3028 
3029 
3030 
3031 
3032 
3033 
3034 
3035 
3038 
3037 
3038 
3039 
3040 
3041 
3042 
3043 
3044 
3045 
30% 
3047 
3048 
3049 



010006 
01X12 
01X16 
010022 
01 ' 
01 . 
01003Q 
010036 
010044 
010052 
010054 
010056 
010064 
010066 

010070 
010074 
OIOIX 
OlOlCH 
010106 
010110 
010112 
010120 
010126 
010134 
010136 
010144 
010152 
010154 
01015b 
010164 
010166 
010170 
01013 
010200 
010202 
010204 
010210 
010212 
010214 
010220 



017700 
016701 
052701 
0201X 

lu4000 
013767 
062767 
026777 
001401 
104021 
022777 
X1401 
104011 

0177X 
016701 
052701 
0201X 
X1401 
104000 
013767 

022763 
X1003 
162767 
026777 
X1401 
104021 
022777 
001401 
1(54011 
104414 
Cg2777 
001401 
104040 
005777 
X1401 
104040 
000167 



171074 
171140 
X1300 



001102 
000002 
171130 



X1102 

000^ 

000004 
171030 



004200 
170710 
1773% 



nuv 
BIS 
CflP 
BEO 
HUT 

cnp 

BEO 
HLT 
CMP 
BEO 
HLT 
BR 

UORKlrbO 



lis 



171142 
171134 
171040 



000000 171024 



171012 
171056 
X1300 



MOV 
MOV 
BIS 

c:?p 

BEO 
HLT 

nov 

POD 
CflP 
BEO 
HLT 
CMP 
BEQ 
HLT 
U0RKls50 



171060 

171034 
170740 



170724 



170704 



8S: 



4S: 



ILFDNE: 



MOV 
MOV 
BIS 
CMP 
BEO 
HLT 
MOV 
AOO 
CMP 
BNE 
SUB 
CMP 
BEQ 
HLT 
CMP 
BEQ 
HLT 
CLRDK 
CMP 
BEO 
HLT 
TST 
BEQ 
HLT 
JMP 



UNNUM.GOCD 
II 100. GOOD 
GOOD.^AD 
.♦4 

atOBUFSV.SRSBA 
.♦4 

!CS1!BA 

l-l,9RSUC 

.♦4 

•CSl'UC 
4J 

9RSCS2.BA0 
UNNUM.&OOO 
I1300.G000 
GOOD, BAD 
.♦4 

atOBUFSV,UORK 
i2. UORK 
UO^.aRSBfi 
.♦4 

!CS1!BA 

•O.aRSUC 

.+4 

!C51!UC 

9RSCS2.BM) 
UNNUH,6000 
•1300!gOOO 

GooD.dm 

.♦4 

SlOBUFSV.UORK 

•2. uom 

8S 

•4.U0RK 

UO^,aRSBfl 

.+4 

!CSl!Bft 
•O^SRSUC 

ICSl'UC 

•4200,aRSCSl 

.♦4 

•OS 

3RSER 

.+4 

!0S 

3S 
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GET UNIT I 
SET IR BIT 
IS C52 CORRECT' 
YES 

GOOD = CORRECT ANS FOR CS2 

DID BA HOVE 

NO 

BA MOVED CM AN ILLEGAL FUNCTION 

DID UC MOVE' 

NO 

UC MOVED 

CONTINUE UNTIL DOtC 

GET CS2 

GET UNIT I 

SET IR BIT 

IS CSS CORRECT' 

YES 

GOOD = CORRECT ANS FOR C52 

GET BUFFER AODR. 

UPDATE IT 

010 BA HOVE 

YES 

BA MOVED ON AN ILLEGAL FUNCTION 
DID UC MOVE' 



YES 
BAD 



UC 



GET CS2 

GET UNIT • 

SET IR BIT 

IS CS2 CORRECT' 

YES 

GOOD = CORRECT ANS FOR CS2 

GET BUFFER AOOR. 

UPDATE IT 

URITE CHECK REV.' 

NO—BRANCH 

YES~BUFFER ADOR. GOES BACKWARDS 

DID BA MOVE 

YES 

BA DIDN'T INCREMENT PROPERLY 

DID UC MOVE' 

YES 

UC DIDN'T INCREMENT PROPERLY 
CLEAR Aa ERRORS 
DID ERRORS CLEAR 
YES 

HO 

DID ERROR CLEAR 

NO 

YES 

.CONTINUE UNTIL DONE 
DONE HITH ILLEGAL FUNCTION TEST 



I TEST 53 TEST ILLEGAL FUNCTION CODE 67 



0£RS«.Pn TST53 
30S0 

n 010220 10M400 



30SM 
30S5 



3058 
3059 

3081 



30fcM 
3065 
3Qbb 
3067 

3Cbe 

30b9 
3070 

3C72 
3D73 



2C80 

-^..^ « 

3085 
3086 
3C87 
3088 
3089 
3090 
3091 
3092 
3093 
309M 
3)95 
30% 
3097 
3098 
3099 
3100 
3101 
3102 
3103 
3104 
3105 




010222 
010224 
010232 

01 

1 

010266 

1 " 
1 

010276 
010300 
OJ0304 
010310 
010314 
010316 
010320 

010332 

CI 3334 

" :% 

010362 
010370 
QI0376 
010402 
010404 

010410 
010414 
010416 
01042D 

0104S 

010432 
010436 
01IH4Q 
010442 
010444 
010452 
01O4S4 
010456 
010464 
010472 
010474 
010476 
010502 
010504 



104414 
012777 
012767 
16777 
12777 
105777 

012701 

104000 
016701 
0S2701 
0177X 
020100 
001401 
104000 
^2777 
001401 
1040C2 
104414 
005777 
001401 
104040 
012777 
012767 
016777 
012777 
105777 
100375 
012701 

017700 
020100 
001401 
104000 
016701 
0S2701 
017700 
020100 
001401 
104000 
0 22 777 
001401 
104002 
012777 
022777 
001401 
104040 
005777 
001401 
104040 



RSil-RSC3-RSa4 BASIC FUNCTION DIftGNOSTIC 
TEST ILLEGAL FUNCTION CODE 67 



E07 
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177777 
024552 

000067 
170624 

170624 
024S50 



170652 
001300 
170572 



040011 
004210 



170416 



SCOPE 



170656 
170740 
170644 
170630 



tST53: 
ILF67 



IS: 



000001 170570 



170556 

177700 170534 

024566 170616 

170612 170522 

000057 170506 
170502 

024546 

170476 



1705X 
001200 
170450 



000001 170446 



2S: 



170420 
170412 



CLROK 
MOV 
NOV 
MV 

nov 

TSTB 

BPL 

MOV 

MOV 

CMP 

BEG 

HLT 

MOV 

BIS 

MOV 

CMP 

BEO 

HLT 

CMP 

BEO 

HLT 

CLROK 

TST 

BEO 

HLT 

MOV 

NOV 

MOV 

MOV 

TSTB 

BPL 

MOV 

MOV 
CMP 
BEO 
HLT 
MOV 
BIS 
MOV 
CMP 
BEQ 
HLT 
CMP 
BEQ 
HLT 
MOV 
CMP 
BEQ 
HLT 
TST 
BEO 
HLT 



; CLEAR ALL RS REG 
•-l.SRSWC :SET UC TO -1 

•<06tBUF+2!2>,U0Ak :GET OUTBUF ADD. 
U0RK.9RSBA :L0A0 ADDR. 
•67.iRSCSl ;D0 FUNCTION 67 
SRStSl DONE YET' 

IS ;N0 
9RSBA.BA0 [GET BA REG 

•<0UT6UF42&tC3>,6000 iGET CORRECT ANS FOR R5BA 



GOOD. BAD 
.♦4 

UNNUM.GOOO 
•1300!gOOD 
9RSCS2.BA0 

good.bAo 

.♦4 

I1.3RSER 

.♦9 

!ER 

aRSER 
.♦4 

!DS 



IS R^ CORRECT' 
YES 

BAO:RSBA GOOO^CORRECT ANS. 
GET UNIT NUMBER 
SET IR AMD OR BITS 
GET CS2 

IS CS2 CORRECT' 
YES 

BA0sCS2 GOOOsCORRECT ANS 

IS RSER CORRECT' 

YES 

ER IS URONG 
CLEAR ALL RS REG 
DID ERROR CLEAR 
YES 
NO 



•-lQQ,aRSHC J SET HC TO -100 
•0UT6tF*16!2,U0Ri^ :QET OUTBUF ADO. 
UORK.aRSBA :LOAO AOOR 



I67.MSCSI 

aRs6si 

2S 

•24S46,G00D 

:^ 

.♦M 

•i^Igooo 
srscs^.bad 

GOOO.BM) 
.♦4 

ll.SRSER 

.+4 

!ER 

•40011. aRSCSl 

t4210,aRSCSl 

.+4 

!DS 

SRSER 

.+4 

!0S 



DO FUNCTION 67 
DONE YET' 
NO 

IF PROG. IS MODIFIED THIS 
NUMBER Uia HAVE TO BE CHANGED. 



IS 
YES 



ORRECT' 



BAOsRSBA GOOD=CORRECT ANS. 
GET UNIT NUMBER 
SET OR BIT 
GEY CS2 

IS CS2 CORRECT' 
YES 

BADsCS2 GOOOsCORRECT ANS 

IS RSER CORRECT' 

YES 

ER IS URONG 

CLEAR ERRORS 

DID THEY CLEAR IN CSl 

YES 

NO 

DID RSER CLEAR 

YES 

NO 



r«INO£C-H-DERSfl-« 
OERSM.Pll TST53 



RS11-RS03-RS0M BASIC FUNCTION DIAGNOSTIC 
TEST ILLEGAL FUNCTION CODE 67 



F07 



01 



01(512 001401 
010514 104100 



QQ5777 170410 



TST SRSAS 
BEG .+4 
HLT IAS 
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:0I0 RSAS CLEAR 
YES 

NO 



t 

I 
I 



I 



3109 



iOHHOO 
OlbTb? 

io»«m 

0 12777 
022777 
OOltOl 
104042 

001401 
104002 

8^1401 
104040 
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G07 
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•TEST 54 TEST PAR IN RSER 

tST54: SCOPE 



170444 007740 PARTST: 



000010 
150600 



17034E 
OlO&OO 



1703&2 
170352 



IS: 



17032& 



flOV 

CLROK 

MOV 

cnp 

BEO 

HLT 

CLRDK 

TST 

BEO 

HLT 

CMP 

BEO 

HLT 



TIHSV, TIMES 

ilO.aRSER 

•156&00,aRSOS 

.♦4 

!DS!ER 

3RSER 

.+4 

'ER 

iioboo.aRSDS 

.♦4 
.'OS 



RESTORE LOOP t 
CLEAR ALL RS REG 
SET PAR 

DID ERR, ATA AND DRY SET^ 
YES 

ER SHOULD SET IF PAR SETS IN RSER 
CLEAR ALL RS REG 
DID PAR CLEAR' 



YES 

PAR DID NOT CLEAR BY CLEAR 
DID ERROR BITS CLEAR 
YES 
NO 



BIl 



H07 



01057H 104400 



"filNOeC-lI-DERSP-H 
jERSflA.Pll TST54 



31?8 

3131 
3132 
3133 
3134 
3135 
3136 
3137 
3138 
3139 
3140 
3141 
3142 
3143 
3144 
3145 
31% 
3147 
3148 
314S 
3150 
3151 

3154 
3155 
3156 
3157 



OlOSTb 
010604 
010606 
010610 



010612 
010620 
010624 
010630 
010634 
010636 
010642 
0106% 

m 

010654 
010654 
010716 
010720 



032777 
001401 
104204 
104400 



012767 
017701 
042701 
005367 
001407 
017700 
042700 
020100 
>7 



104402 
104204 



RSn-RSC3-Ri04 BASIC FUNCTION DI0GM05TIC 
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: CHECK BUS 12 TO 15 FOR 0 

: CHECK SECTOR FRACTION TO WATCH FOR nOVEflENT 

•CHECK CS BITS IN LA AND ADDRESS CONFIRM IN MR REG 

TEST 55 LOOK AHEAD TEST 

tST55: SCOPE 



170000 



170320 LATST: BIT 
BEQ 
HLT 

TST56: SCOPE 



M170000,SRSLA 

.+4 

!LA 



;N0W TEST MOVEMENT IN SF BITS 



171005 
170300 
007700 
170344 

170262 
007700 



010660 



170360 



IS: 



ERRR: 



LATDON: 



MOV •171005.W0RK 

MOV 9rsla.g6od 

BIC 17700, GOOD 

DEC UORK 

BEQ ERRR 

MOV aRSLA.BAD 

BIC I7700.BA0 

CMP GOOD, BAD 

BEQ IS 

BR LATDON 

TYPE , . +2 

HLT IlA 



ARE BITS 12 TO 15 CLEARED^ 
YES 

BITS 12 TO 15 SHOLID BE CLEARED 



SET UP FOR TIME OUT ROUTINE 

GET READING FROM LA 

GET RID OF CS BITS 

UAIT FOR DISK 

TYPE ERROR 

READ LA 

CLEAR CS BITS 

DID SF BITS CHANGE^ 

WAIT FOR TIME OUT 

LA OK CONT 

;.ASCIZ <i5><12> "SECTOR FRACTIONS NOT MOVING" 
TYPE LOOK AHEAD REG 
;DONE CONT. 



107 



'IfllNDeC-ll-OERSfl-fl 
OERSWJ.Pll TST5' 



3158 
3159 

^il? 

3lb3 

i\U 

3Ifa7 
31b8 

3i7C 
3171 
3172 
3173 
317M 
3175 
3176 
3177 
3178 
317<3 
3190 
3181 
3182 
3183 
3I8H 
3165 
318b 
3187 
3188 
3189 
3190 
3191 
3192 
3193 
319M 
3195 
3196 
3197 
3198 
3199 
3200 
3201 



010720 104M0C 



8 



010722 

81 

0107H0 
lOTHH 
10752 
01075M 
010758 
010780 
0107M, 
010770 



01Q772 
011000 

011006 
011012 
011020 
011022 
011026 
011030 
011036 
011040 
011044 
01 1050 
011056 
OllObO 
011064 
011066 
011072 
011076 
OlllOC 
011102 
011104 

011106 

011110 



016767 
2767 
414 
012701 
032777 
001407 
005301 
001376 
032777 
(501401 
104220 



012777 
012767 
005277 
022777 
001433 
005367 
001427 
032777 
001771 
017700 
042700 
012767 
006000 
005367 
001374 
0)7701 
042701 
020100 
001401 
104000 
000735 

104262 
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007540 
000010 

001000 
001000 



177777 
177777 
170102 
010000 

170152 

001000 

170060 
000077 

170116 

170022 
177700 



TEST 57 CHECK CS BITS TO INCREMENT AND ADDRESS CONFIRM BIT IN MR 

tSTS7: SCOPE 



170240 
007530 



CSTST: 



170156 

001000 170142 



MOV 

MOV 

CLRDK 

MOV 

BIT 

BEQ 

DEC 

BNE 

BIT 

BEQ 

HLT 



TIMES.TIMSV 
•10, TIMES 

11000, GOOD 
IBIT9 SRSHR 
ADDCF 
GOOD 
.-2 

MBIT9,aRSMR 

.+4 

.'MR 



SAVE LOOP CT 
LOOP 10 TIMES 
CLEAR ALL RS REG. 
LOAD COUNTER 
IS ADD CONFIRM BIT 0^ 
YES CONTINUE 
UAIT FOR 
DISK TO MOVE 
IS AAOD. CON. BIT BIT 0' 
YES 

ADO. CONF. BIT ALUAYS 



A 1 



;NOU TEST TA BITS AND ADD. CON. BIT IN MR 



170114 
170172 

170074 
170072 
170124 



AOOCF: 
IS: 



2S: 



MOV 
MOV 
INC 
CMP 
BEQ 
DEC 
BEQ 
BIT 
BEQ 
MOV 
6IC 
MOV 
ROR 
DEC 
BNE 
MOV 
BIG 
CMP 
BEQ 
HLT 
BR 



TMEOUT: HLT 



3S: 



M-1,SRS0A 

•-1.M0RK 

aRS6A 

tlOOOO.aRSDA 

DONCS 
UORK 
TMEOUT 
11000. SRSMR 
25 

aRSLA.BAO 

•77.bAD 

•6.C1ORKI 

ba6 

UORKl 
3S 

9RS0A.600D 
•I77760.GOOO 
GOOD, BAD 
.♦4 

IS 

•MR!ER!OS 



DONCS: 



INIT RSOA 

SETUP TIMEOUT COUNTER 
GET NEXT SECTOR 
DONE PUL YET» 
YES 

DO TIMEOUT ROUTINE 
ADO. CON. NEVER CAME UP 
DID ADO CONFIRM BIT SET' 
YES 
GET LA 

CLEAR 5F BITS 
SET UP COUNTER 
MOV SA BITS RIGHT 
DO 6 TIMES 
DONE YET' 
GE7 DA 
CLEAR JUf^ 

ARE SA BITS = IN DA AND LA REG.' 

oic 

GOOD =DA BAD - LA 
NO UAIT 

; ADDRESS CONFIRM BIT NEVER SET COULD BE BAD OR 
BAD LA OR BAD COMPARE BETUEEN LA AND DA 
TEST DONE CONTINUE 



J07 



nAir€£C-il-DERSfl-« 
OERSfl«.Pll TSTbC 

3202 
3203 
320M 

320S 01 11 10 I0M40Q 
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32£ 
3208 
3209 
3210 
3211 
3212 
3213 
3214 
3215 
3216 
3217 
32J8 
3219 
3220 
3221 
3222 
3223 
3224 
3225 
322t> 
3227 
3228 
3229 
3230 
^J^3l 
3232 
3233 
3234 
3235 
323b 
3237 
3238 
3239 
32H0 
3241 
3242 
3243 
3244 
3245 
32% 
3247 
3248 
3249 
3250 



011112 
011120 
01112b 
011134 
01114C 
011142 
01114b 
011152 
011154 
ClUSb 
OlUbO 
011Ib2 
0111b4 
Olllbb 
011172 
011174 
011202 
011210 
01121S 
011224 
011230 
011232 
011234 
011240 
011244 
0112SC 
0112S4 
0il2Sb 
0112b0 
01l2b2 
011270 
011272 
011274 



01b7b7 
012737 
012737 
012702 
005712 
012712 
012701 
011111 
005711 
005712 
100402 
005012 
00044b 
012712 
104414 
0127b7 
012777 
012777 
012777 
105777 
100375 
005012 
005Cb7 
017700 
012701 
05b701 
020100 
001401 
104000 
022777 
001401 
104040 
0001b7 



17005c 
011300 
000340 
172100 

000004 
001200 



000001 

177777 
0 01200 
177777 
OOOObl 
Ib7b54 



lb7740 
Ib7b42 
020100 
lb7702 



1442b0 

000020 



;TEST bO PARITY TEST 

:ftt«ftt«*»«ttfftfi«H««ftfftftt*««««i«««iftf«»««tfftfff«««««t^ff«*f «««««««»§««««* 

tSTbO: SCOPE 



00734b 
000004 
00000b 



PART: flOV 
flOV 
MOV 
MOV 

TSTAGN: TST 
MOV 



01334b 
lb7702 
Ib7b72 
Ib7bb0 



Ib7bl4 



MOV 

IJ: MOV 
TST 
TST 
BMI 
CLR 
BR 

2S: MOV 
CLROK 
MOV 
MOV 
MOV 
MOV 

3S: TSTB 
BPL 
CLR 
CLR 
MOV 
MOV 
BIS 
CMP 
BEQ 
HLT 
CMP 
BEQ 
HLT 
JMP 

fTRAPOUT ROUTINE 



TIMSV, TIMES 
•PRTP'3I4 
I340.dlb 
IMPR6,R2 

(R2) 

iUUP.3R2 
•UORK.Rl 

m,m 

SRI 
3R2 
2S 
8R2 
PRTPl 
ll,9R2 

I177777.0UTBUF 
•MCRK.aASBA 
l-l,WSUC 
•bllaRSCSl 

aRsisi 

3S 

aRS 

UORK 

aRSCS2,BftD 
tSOlOO.GOOO 
UHNUn.GOOO 
GOOO.BM) 
.+4 

•144260, aRSCSl 
.♦4 
!0S 
NOPAR 



011300 


022b2b 




PRTP: 


CMP 


011302 


022702 


172136 


PRTPl: 


CMP 


01130b 


001404 






BEQ 


011310 


052702 


000002 




ADO 


011314 


00Qlb7 


177b20 




JMP 


011320 


012737 


000006 


000004 NOPAR: 


MOV 


01132b 


005037 


00000b 




CLR 



•172l3b,R2 
NOPAR 
•2.R2 
TSTAGN 

lb, 314 
3I& 



RESTORE LOOP COUNTER 
SETUP TIME OUT VECTOR 

GET PAR REG 

DOES IT EXIST 

YES SET WRITE WRONG PARITY 

GET TEST LOCATION 

WRITE WRONG PARITY 

READ IT 

DID PARITY ERROR SET' 

YES 

CLEAR PARITY REG 

GET NEXT PARITY REG 

CLEAR UUP AND ENABLE BAD PARITY 

CLEAR AU RS REG 

DATA TO BE X-FERED 

SET UP CURRENT ADDRESS 

SET UORD COUNT TO -1 

GO URITE 

DONE YET» 

NO UAIT 

CLEAR PARITY REG 
URITE GOOD PARITY 
GET CS2 

GET CORRECT AND FOR CS2 

IS CS2 CORRECT? 

YES 

CSS SHOULD = GOOD 
IS CSl CORRECT? 
YES 

GET OUT 



; CLEAR STACK 
DONE YET? 
YES NO PAR REG 
NO TRY AGAIN 
RETRY 



MfilNDEC-U-OERSfl-fi 
DERSM.Pll TSTbl 



R5il-R£J3-RSQ4 BASIC FUNCTION DIfiGNOSTIC 
TEST URITE CHECK ERROR 
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3251 
3252 

3255 
3256 
3257 
3258 
3259 
32&0 
32&1 
2262 
3263 
326H 
3265 
3266 
3267 
3266 
3269 
3270 
3271 
3272 
3273 
327H 
3275 
3276 
3277 
3278 
3279 
3290 
3281 
3282 
3283 
3284 
3285 
3286 
3287 
3288 
3289 
3290 
3291 
3292 
3293 
3294 
3295 
32% 



011332 iOHSOC 



011334 
011336 
011342 
011350 
011356 
011364 
011370 
011372 
0114X 
011402 
011410 
011412 
011416 
011420 
011422 
311426 
011430 
011434 
011436 
01144»l 
011452 
011456 
011464 
011470 
011472 
011476 
011502 
011506 
011510 
011512 
011514 
011520 
011522 
011530 
01153C 
311536 



1044 H 
005067 
013777 
012777 
012777 
105777 
100575 
032767 
001410 
012767 
000241 
006167 
103123 
000406 
005067 
000261 
006167 
103503 
013777 
012777 
005077 
012777 
105777 
100375 
017700 
016701 
052701 
020100 
001413 
104000 
016700 
005001 
032767 
001402 
U12701 
104000 



013206 
001102 
177777 
000061 
167514 

040000 

177777 

013132 



013122 
013114 

001102 
177777 
167436 
000051 
167414 

167410 
167454 
040300 



013030 
040000 
177777 



;TEST 61 TEST URITE CHECK ERROR 

tST61: SCOPE 

: URITE A UORD OF 0 AND FLOAT A 1 TRSOUGH IT TO CAUSE UCE 
SET BIT14 IN ONCEE AND URITE A UD OF -1 AND FLOAT 0 
TO CAUSE UCE 



UCETST: CLRDK 



167542 
167532 
167520 



167564 
013140 



167446 
167436 

167420 



167434 







WLt 1 1 : 


nuv 




nuv 




MAU 

nuv 


JS: 


TCTD 
19 ID 




OBI 
DrL 




DTT 








nuv 




n r 


bs: 


Dru 
nUL 








on 


9C« 
C%i 








is: 


nUL 






as: 


nuv 




nov 




CLR 




MOV 


4S: 


TSTB 




6PL 




nov 




MOV 




BIS 




CMP 




BEQ 




HLT 




MOV 




CLR 




BIT 




BEQ 




MOV 


8S: 


HLT 



OUTBUF 

atOBUFSV.SRSBA 
l-l.SRSUC 

i&i!aRscsi 
aRs6si 

3S 

IBIT14, ONCEE 
2S 

1-1, OUTBUF 

OUTBUF 
UCEOON 
5S 

OUTBUF 

OUTBUF 
UCEONE 

StOBUFSV.aRSBA 

t-i.imsuc 
aRs6A 
•si.aRSCSi 
aRs6si 

HS 

aRSCSS.BAO 
UNNUM.&OOD 
•4030D.GOOD 
GOOD, BAD 
7$ 

OUTBUF, BAD 
GOOD 

•B1T14, ONCEE 
8$ 

«-l.GOOD 



CLEAR ALL RS REG 

URITE A UO OF 0 

SET UP CURRENT ADDRESS 

SET UORD COUNT TO -1 

GO URITE 

DONE YET* 

NO UAIT 

URITE A 1 OR 0' 
URITE A 0 
URITE A 1 
CLEAR CARRY 

FLOAT A 0 THROUGH BAD UD 

DONE GET OUT 

CHECK UCE 

URITE A 0 

SET CARRY 

FLOAT A 1 

GET OUT UHEN DONE 

SET UP CURRENT ADDRESS 

SET HORO COUNT TO -1 

GO URITE CHECK 

READY YET* 

NO UAIT 

GET 052 

SET UNIT i 

SET BITS 

IS CS2 CORRECT* 

YES 

BA0=CS2 600D=C0RRECT ANS 

GET BAD UD THAT SHOULD CAUSE UCE 

GET GOOD UD IF URITING 0 

ARE UE URITING 1 OR 0 

0 

GET GOOD UD FOR 1 

GOOD = CORRECT UD URITTEN 

BAD = INCORRECT UD THAT UCE DID NOT CATCH 



.07 



"AiriDEC-U-DERSfl-fl 
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3297 
3298 
3299 
3300 
3301 
3302 
3303 
3304 
3305 
3306 
3307 
3308 
3309 
3310 
3311 
3312 
3313 
3314 
3315 
3316 
3317 
3318 
3319 
3320 
3321 
3322 
3323 



011540 
OllSWfe 

011556 

mm 

011570 
011572 
011574 
011576 
011602 
011606 
011612 
011614 
011616 
011620 
011626 
011630 
011632 
011640 
011642 
011644 
011652 
011654 
011662 
011666 



022777 
001401 

m 

013701 

SlooSi 

001401 
104000 
104414 
016701 
052701 
017700 
020100 
001401 
104000 
022777 
001401 
104001 
032767 
001673 
000663 
052767 
104414 
012767 
000167 
042767 



144250 167336 7S: 



167334 
0C1102 
000002 



167354 
000100 
167274 



004200 
040000 

040000 

177777 
177454 
040000 



167256 

167324 

167312 
012666 
167270 



CMP 
BEO 
HLT 
MOV 

nov 

m 

CMP 
BEQ 

HLT 
CLRDK 

nov 

BIS 

nov 
cnp 

BEO 

HLT 

cnp 

BEQ 
HLT 
BIT 
BEQ 
BR 

UCEONE: BIS 
CLRDK 

nov 
jnp 

UCEOON: BIC 



•144250, 3RSCS1 
.♦4 

•CSl'ER'DS 

SRSBfl.BAO 

3i0BUFSV,G00D 

i2.G00D 

BA^GOOD 

.+4 



UNNUn.GOOD 

VIOO.GOOD 

3R5CS2.BflD 

GOOO.BAO 

.♦4 

14200, aRSCSl 

.■»-4 
'CSl 

iBIT14,0NCEE 

a 

iBITlH.ONCEE 

•-1.QUTBUFF 
UCEtT 

iBITl4,0NCEE 



SETS 



DID TRE SET' 
YES 

FE^CH^JukBENrfiioREi! 
UHPT R5BA SHOULD EQUPL 
UPDATE IT 
IS RSBfl CORRECT 
YES EXECUTE CONTINUE 
RSBfl FAILED TO INCREMENT 
CLEAR ALL RS REG 
PUT DRIVE IN GOOD 
SET IR BIT 
GET CS2 
IS CS2 CORRECT 
YES 

BAD :CS2 GOOD IS CORRECT ANS 

DID TRE CLEAR' 

YES 

TRE DID NOT CLEAR WITH CLEAR 
FLOATION A 1 OR 0' 
FLOAT 1 
FLOAT 0 
SET BIT14 



;N0U WRITE -1 IN OUTBUF 
; CLEAR TEST FLAG 



7107 



r!flINOEC-ll-D£RSfl-A 
DERSflfl.PU TSTb2 
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JOC~ 
























XW < lUw 




















in44I4 








nt 1 7nn 

U 1 1 f uu 




177777 


D12fe42 




A A f U9 


013777 


001102 

UUX A Ww 


lb717b 


Til? 




ni?777 

UXCf ' « 


177000 

X * ' uwu 


lb71bb 

X B f X WW 




ni 17?? 


□12777 

Ui & r f ( 


ODDObl 

WUUUU X 


lb7154 

X B • X W ■ 




□11730 


105777 


Ib7l50 






ni 173M 


100775 




lb714Q 

X U f A f W 


333f> 


n i 1 73fe 


012777 


000071 

UUUU) X 


3337 


Dl 17^4 


QOM 7b7 

UU ■ ( W ( 


0123Db 

UX WUWU 






ni i7?:d 


XU it UA 








ni 17V 


022777 


1442b0 


lb7124 

X U • X w ■ 


3340 


Ul 1 • ou 


001401 

UUl A 






33m 


ni i7fiP 

UX 1 r OC 


104001 

A U lUU A 






334? 




005777 


Ib7l32 

XB> XUb 




3343 


01177n 

UX X r f \J 


D0'401 

UWa ^ux 








ni 177? 

UX X r ' C- 


104100 








UX X ■ ' » 


016701 

UXO f U A 


lb715b 

AO* XWU 




334fi 


U X wUUU 


052701 

Uww> UX 


002200 

UUW W WU 






U X CUU 1 


017700 

UX > r UU 


lb707b 

XOf Uf U 




334B 


U A wU X U 


020100 






3349 




001401 

UUA lUA 






33^n 


UX WU X • 


1040DQ 

XU lUUU 






33^1 


U X&UXD 


005777 

UUwr ' ' 


lb70bb 

AUf UUU 






U X C>Uww 


001001 

UU AUUX 






33S3 




1Q4Q11 






33S4 




005777 

uuw • ■ 


lb70bb 

A w f www 




3355 


□13032 


{M1401 

'UA 








□12034 

UXbUw • 


104040 

XU lU >u 




lb7040 


3357 




052777 

UWk Iff 


040000 

W IWWWU 


3353 


012044 


042701 

W <fe* UA 


002000 

UUfaUUW 




3359 


012050 


017700 


ib7032 




33&0 


012054 


020100 






33&1 


Q120Sb 


001401 






33&2 


0120b0 


104200 






33L3 


G120b2 


022777 


0042b0 


lb7014 


33bH 


012070 


001401 






33b5 


012072 


104040 







TEST b2 TEST PR0GRAI1 ERROR BIT IN RSCS2 

tSTb2: SCOPE 



PGETST: CLRDK 
MOV 
MOV 
MOV 
MOV 

2J: TSTB 
BMI 
MOV 
JSR 
HLT 
CMP 
BEQ 
HLT 
TST 
BEQ 
HLT 
MOV 
BIS 
MOV 
CMP 
BEQ 
HLT 
TST 
BNE 
HLT 
TST 
BEQ 
HLT 
BIS 
BIC 
MOV 
CUP 
BEQ 
HLT 
CMP 
BEQ 
HLT 



il77777, OUTBUF 

aiOBUFS^.SRSBA 

•177000.5RSWC 

Ibl.SRSCSl 

3RS6S1 

2S 

•71.SRSCS1 

PC.flfllTRY 

'CSl 

ill442bO,aRSCSl 

.+4 

!CS1 

aRSAS 

.+4 

'AS 

UNNUM,GOOD 
M22QQ.G00D 
8RSCS2.BA0 
GOOD, BAD 
.+4 

aRsuc 

.+4 

iUC'CSl 
aRSER 
.+4 
IDS 

•TRE,8RSCS1 

tPGE.GOOD 

aRSC§2.6flD 

GOOD, BAD 

.♦4 

!CS2 

•42bO,8R5CSl 

.+4 

•DS 



CLEAR ALL R5 REG 
DATA TO BE X-FERED 
SET UP CURRENT ADDRESS 
SET WORD COUNT 
GO WRITE 

IS ROY CLEARED YET' 
NO UAIT 
GO READ 

UAIT FOR READY 
RDY NEVER CANE UP 
IS CSl CORRECT? 
YES 

TRE SHOaO SET BY SETTING PGE 

AS SHOULD s 0 

YES 

RSAS SHOULD s 0 

GET UNIT t 

SET PGE, IR. AND OR 

GET CS2 

IS IT CORRECT? 

YES 

BAD s CS2 

SHOULD NOT BE 0 

BECAUSE PGE SHOULD ABORT 

CURRENT OPERATION 

DID ANY ERRORS SET? 

NO 

RHR SHOULD BE SET 
CLEAR ERRORS 
CLEAR PGE ERROR 
GET CS2 

IS CS2 CORRECT' 
YES 

PGE DID NOT CLEAR BY CLEARING TRE BAD = CS2 

DID 5C CLEAR 

YES 

DID NOT CLEAR BY CLEARING TRE 



HAINDEC-U-OERSfl-ft RSii 
DERSA«.P11 TSTb3 TEST 



■8.£C3rRS0S_BflSIC.FUNCTI0N_piflGN0STIC 

T C 



N07 



RnR IN RSER REGISTER TRYING TO URITE 
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33bb 








33£,7 








33&8 








33b9 


012074 


104400 












3371 


01207& 


104414 




3372 


012100 


013777 


001102 


3373 


01210& 


012777 


177700 


337M 


012114 


012703 


1720b0 


1 3375 


012120 


011304 




1 337t, 


012122 


042704 


000017 


i 3377 


01212& 


022704 


000020 


J378 


Q12132 


001372 




, 337S 


Q1E13H 


012777 


000031 


3380 


012142 


012777 


007777 


3381 


012150 


0047b7 


012102 


3382 


012154 


104001 




3383 


01215& 


QB2777 


000004 


338M 


0121&4 


001401 




3385 


0121&£> 


104002 




338& 


012170 


022777 


007777 


3387 


01217b 


001001 




3388 


012200 


104004 




3389 


012202 


022777 


ISObOO 


3390 


C12210 


001401 




3391 


012212 


104042 




3392 


012214 


022777 


104230 


3393 


012222 


001401 




3394 


012224 


104040 




339S 


0122% 


104414 




33% 


012230 


005777 


lbbbb4 


3397 


012234 


001401 




3398 


01223b 


104002 




3399 


012240 


022777 


004200 


3400 


01224b 


001401 




3401 


0122'?Q 


104040 




3402 








3403 








3404 








3405 








340t> 


012252 


104400 




3407 








3408 


012254 


104414 




3409 


01225b 


013777 


001102 


3410 


0122b4 


012777 


177700 


3411 


012272 


012777 


OOOObl 


f 3412 


012300 


105777 


IbbbOO 


3413 


012304 


100775 




3414 


01230b 


012777 


177773 



■JEST b3 TEST RtIR IN RSER REGISTER TRYING TO URITE INTO RSOA 

tSTb3: SCOPE 



RMRTl: 



IS: 



CLROK 

NOV atOBUFSV.aRSBfl 

MOV 1177700, SRSUC 

nOV il720b0 R3 

NOV aR3,R4 

BIC 117, R4 

CMP #20 R4 

BNE IS 

MOV i31.aRSCSl 

MOV •7777.aRSDfl 

JSR PC.WfllTPY 

HLT !C§1 

CMP t4.aRSER 

BEQ M 

HLT !ER 

CMP 17777, aRSDfl 

BNE .+4 

HLT ' Dft 

CMP llSObOO.aRSDS 

BEQ .+4 

HLT !DS!ER 

CMP 1104230, aRSCSl 

BEQ .+4 

HLT !DS 

CLRDK 

TST aRSER 

BEQ .+4 

HLT !ER 

CMP 14200, aRSCSl 

BEQ .-^4 

HLT !DS 



CLEAR ALL RS REG 

SET UP CURRENT ADDRESS 

SET UORD COUNT 

GET RSLA REG 

WAIT FOR 

THE MIDDLE 

OF SECTOR 0 

BEFORE DOING A SEARCH 

SEARCH 

CAUSE ERROR 

WAIT FOR READY 

RDY NEVER CAME UP 

DID RMR SET' 

YES 

ER SHOULD = 4 

DID DA GET MODIFIED' 

NO 

DID ERR SET' 
YES 

ER DID NOT SET BECAUSE OF RMR 

IS CSl CORRECT? 

YES 

CSl SHOULD = 144250 
CLEAR ALL RS REG 
DID RMR CLEAR? 
YES 

RMR DID NOT CLEAR WITH A CLEAR 

IS CSl CORRECT' 

YES 

NO 



:««««««««««««««»«««««««««««««««««««««««««««««««««««»«««««««««««««««««««« 
TEST b4 TEST RMR IN RSER REGISTER TRYING TO URITE INTO RSER 

»««««««««««««»«»««««««««««««««««««««««»«««««»«««««««««««««««««««««««««««« 

tSTb4: SCOPE 



lbbb2b 
Ibbblb 
lbbb04 



lbbb04 



RMRT2: 



2S: 



CLRDK 

MOV 

MOV 

MOV 

TSTB 

BMI 

MOV 



aiOBUFSVJRSBA 
•177700.aRSWC 

tbi.aRs6si 
aRSCSl 

2S 

•177773, aRSER 



CLEAR ALL RS REG 

SET UP CURRENT ADDRESS 

SET UORD COUNT 

GO URITE 

IS RDY SET? 

YES UAIT FOR IT TO CLEAR 
CAUSE ERROR 



Hi 



-oc.:2-R£04 BASIC FUNCTION DIAGNOSTIC 



BOB 



TEST R.1R IN R5EP REGISTER TRYING TO WRITE INTO RSER 
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>15 
"MB 
3M17 

>H9 
^ill 
3H?0 
>»21 
3M22 

3^3H 
3^2S 

3H27 

3M30 
3S31 
3S32 
3M33 
3H>4 
y*3S 
3S3b 
3Mr 
3S38 
3M39 
34M0 
3441 
3442 
3443 
3444 

3447 
3448 
344S 
3450 
3451 



012314 004767 n:i73fc 

Clfiy JpTn 000004 

012330 001401 

O1I5J4 ISObOO 

012342 001401 

012344 104042 

0123% 022777 1442t»0 

012354 Kl401 

012356 104040 

012360 104414 



012362 104400 



012364 
012366 
012374 
012402 
012S10 
012414 
012416 
012H24 
012MX 
012432 
012H40 
018442 
012444 
012452 
012454 
012456 
012%4 
012466 
012470 



104414 
013777 
012777 
012777 
1 05777 
10 0775 
012777 
004767 
104001 
022777 
001401 
104002 
022777 
00140! 
104042 
022777 
001401 
1D4040 
104414 



001102 
177700 
000061 
166470 

000030 
011626 

000004 
150600 
144260 



166570 
166554 
166530 



JSR 
HLT 

CUP 

BEO 
HLT 
CAP 
9EQ 
HLT 
CMP 
BEQ 
KlT 
CLRDK 



PC.UfllTRY 
•C§1 

i4.aRSER 
'ER 

1150600. SRSOS 
.♦4 

'OS'ER 

tl44260,aRSCSl 

.*4 
!05 



ROY N£'./ER CAKE UP 
DID RNR 5ET^ 
YES 

ER SHOULD : 4 
DID EWTSET' 
YES 

ERR DID NOT SET BECAUSE OF RMR 
IS CSl CORRECT' 

YES 

CSl SHOULD : 1H4260 
CLEAR ALL RS REG 



IteST 65 TEST RfIR IN RSER REGISTER TRYING TO URITE INTO RSCSl 

tSTbS: SCOPE 



166516 
166506 
166474 



166463 
166460 
166444 
16642Q 



RnRT3: 



2S: 



CLRDK 

NOV aiOBUFSVjRSBA 

NOV •177700.SRSWC 

NOV Hl.SRSdSl 

TSTB aRSiSl 

BNI 2S 

MOV t30,8RSCSl 

JSR PC.HAITRY 

HJ icii 

CMP l4,aRSER 
BEQ 

HLT *ER 

CNP 1150600, aRSOS 

BEO .+4 

HLT 'DS'ER 

CNP 1144260, dRSCSl 

BEQ .'^4 

HLT !0S 

CLRDK 



CLEAR ALL RS REG 

SET UP CURRENT ADDRESS 

SET UQRD COUNT 

GO URITE 

IS RDY SET' 

YES UAIT FOR IT TO CLEAR 

CAUSE ERROR 

UAIT FOR READY 

RDY NEVER CANE UP 

DID RHR SET' 

YES 

ER SHOULD = 4 
DID ERR SET' 
YES 

ERID NOT SET BECAUSE OF R«R 

IS CSl CORRECT' 

YES 

CSl SHOia.D = 14426D 
CLEAR ALL RS REG 



Pil 



-C£RSi5-A 

TSTbS 



C08 




3H57 
3H58 
3S59 

3^ 
3%1 

3%5 

3^70 

3M7^ 
3H75 

1H77 
3S78 
3H7g 
3S9D 
3^81 
3M&2 
3-483 
3*494 
3*485 



012472 IWM 



012S7S 

01250H 
012S12 
012S1& 

012530 

0125% 
012552 
0125t>0 
0125b2 
01256b 
012570 
012572 
3i257b 
012SOO 
0l2t>Q2 
012610 
012512 
012614 
012622 
012624 
012626 
012630 
012636 
C1264C 



104**14 

013777 

012777 

012703 

011304 

042704 

022704 

001372 

012777 

012777 

0OSO67 

032777 

001004 

005267 

001371 

104001 

005777 

M1401 

1040G2 

022777 

001401 

104042 

022777 

001401 

104040 

104414 

022777 

001401 

134040 



RSil-R£C3-RS04 BASIC FUNCTION DIAGNOSTIC ttACMl 
TEST THAT RnR DOES NOT SET BY URITTING INTO RSAS 
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001102 
177700 
172060 

000017 



000031 
OGOOOC 
lbbH2b 
000200 

166412 
Ibb322 
llObCO 
104230 



;i««*««ftft«tftffffffff«ftft«ff«tft*tt«ft«tff«tf«ft«ff«M«tfftffttff«lfi*«iMtf«f#*t 

;TEST bb TEST THAT RHR DOES NOT SET WRITTING INTO RSAS 

tSTbb: SCOPE 



lbb40b 
lbb37b 

IS: 



1663H4 
166354 

166336 2S: 



3S: 

166306 
166262 



RnRT4: CLROK 



0042CO 166246 



NOV 

NOV 

MOV 

SIC 

CMP 

BNE 

MOV 

MOV 

CLR 

BIT 

BNE 

INC 

BNE 

HLT 

TST 

BEQ 

HLT 

CMP 

BEQ 

HLT 

CMP 

BEQ 

HLT 

CLRDK 

CMP 

BEQ 

HlT 



aiOBUFSV.SRSBA 

1177700. iRSUC 

•1 72060. R3 

aR3,R4 

•17, R4 

•20, R4 

IS 

•31.3R5CS1 

•O.iPSAS 

UORK 

«BIT7,3RSDS 
3S 

UORK 
2S 

•CSl 
9RSER 
.♦4 
'ER 

•1 10600, 9RS0S 
.♦4 

'OS'ER 

•104230. aRSCSl 

.♦4 

!D5 

•4200. aRSCSl 
.+4 

IDS 



CLEAR ALL R5 REG 

SET UP CURRENT ADDRESS 

SET UORO COUNT 

GET RSLA REG 

UAIT FOR 

THE MIDDLE 

OF SECTOR 0 

BEFORE DOING fi SEARCH 

SEARCH 

TRY TO CAUSE ERROR 
CLEAR COUNTER 
«AIT FOR DRY 
READY CONT 
COUNT 
RETRY 

ROY NEVER CAME UP 
DID RMR SET' 
NO 

ER SHOULD ' 0 
DID ERR SET' 
NO 

OS SHOULD s 110600 
IS CSl CORRECT' 

YES 

CSl SHOULD = 144260 
CLEAR ALL RS REG 
IS CSl CORRECT' 
YES 
NO 



RSil-R£C3-R£CW BASIC FUNCTION DIftGNCSTIC 
TEST DCK IN RSER 



DOS 
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3^8b 
3^B7 
3^38 
>49<} 

3^91 
3S92 

3Hg3 

34S5 
3S% 
3M97 
34% 
349S 
3S00 
3501 
3502 
3503 
3504 



3507 
3508 
350S 
3510 
3511 
3512 
3513 
3514 
3515 
3516 
3517 
3518 
3519 
3520 



012642 10440C 



012644 
0126% 
012654 
012660 

i\m 

012676 
012704 
012712 
012720 
012726 
012732 
112734 
112740 
012744 

012760 
012764 
012766 
012772 
012776 
013000 
013006 
013010 
013014 
013020 

oir" 

01; 



104414 

001003 
012767 
016777 
012767 
013777 
05 2777 
012777 



»7 

013777 
012777 
OirTK 
011203 
042703 
022703 
001372 
012777 

011^ 
0427ra 
022703 
001372 
012777 
016777 



177500 
166306 

177600 
1 66310 
177777 
XI 102 
000010 
000061 
166152 

166154 
011604 

o giigg 

177777 
172060 

0O0C77 
004000 

000061 

000017 



1 1,1 iQi 



000040 
166122 



166330 



166314 
166212 
011644 
166200 
166166 
166156 



166140 
166130 



166076 



166056 
166050 



;TEST 67 TEST DCK IN RSER 

tST67: SCOPE 

:D0 A URITE AND THEN A CLEAR FUNCTION THAT SHOULD CAUSE DCK TO SET 



DCKTST: CLRDK 





MOV 




TST 




BNE 




NOV 


IS: 


flOV 




NOV 




nov 


■4$: 


BIS 




NOV 


5S: 


TSTB 




BPL 


21: 


CLR 




CLR 




MOV 




MOV 




MOV 


3S: 


MOV 




BIC 




CMP 




BNE 




MOV 


&S: 


MOV 




BIC 




CMP 




BNE 




MOV 




MOV 



1177500, U0RK2 

RS04DT 

IS 

•177600.W0RK2 

U0RK2,9A5UC 

i-1.06TBUF 

SiOBUFSV.SRSBA 

tlO.SRSC^2 

•61.SR5CS1 

aRs6si 

5S 

8RSDA 
OUTBLr 

StOBUFSV.SRSSA 

•-l.aRSWC 

I17^060.R2 

(R2).R3 

•77.ft3 

•4060,R3 

3S / 

•61,aRSCSl 

(R2).R3 

•17,ft3 

•20 R3 

6S 

•40.8RSCS2 

urtoi.aR5CS2 



CLEAR ALL R5 REG 
GET UC FOR RS04 
IS THIS A RS04' 
YES 
NO 

LOAO UC 
WRITE -1 

SET UP CURRENT ADDRESS 
SET BAI BIT 
GO URITE 
IS ROY SET' 

WAIT FOR WRITE TO FINISH 
SET OSK ADDRESS TO 0 
URl"^ 0 

SET JP CURRENT WORESS 
LOAj WC 

PLT RSLA AOOR INTO R2 

GET LA AND WAIT FOR 

SECTOR 40 

BEFORE 

WRITING 

GO WRITE 

GET RSLA AND WAIT FOR 

MIDDLE OF SECTOR 

0 BEFORE EXECUTING 

A CLEAR FUNCTION 

CLEAR ALL REG. 00 IT THIS WAY 

00 NOT USE TRAP 



DERSfW.Pii TSTfe? 



P5il-RS:2-R£Q4 EflSIC FUNCTION DIAaNOSTIC 
TEsT OCK l-i R5ER 



EOS 



3521 
3S22 
3523 
3S2S 
3525 
3S2S 
3527 
3529 
3S2S 
35» 
3531 
3532 
3533 
3534 
3535 
3536 
3537 
3538 
3539 
3SH0 
3SM1 
3542 
3543 
3544 
3545 
3546 
3547 
3548 
3549 
3550 
3551 
3552 
3553 
3554 
3SS5 
3558 
3557 
3556 
3559 
3560 
3561 
3562 
3563 
3564 
3565 
3566 
3567 



013036 
J 13042 
013044 
013046 
013054 
013062 
013070 
013074 
013076 
013104 
013106 
013110 
013116 
013120 
0l31g 
013130 
013132 
013134 
013140 
01314H 
013150 
013152 
013154 
013156 
013162 
013166 
013170 
013172 
013174 
013200 
013204 
013206 
013212 
01^ 

013224 
013226 

013234 
013240 
013242 
013244 
013252 
013260 
013266 
013272 



105777 
100401 
104001 
013777 
016777 
012777 
105777 
100375 
022777 
X1401 
104002 
022777 
001401 
104040 
022777 
001401 
104044 
017700 
016701 
052701 
020100 
001401 
104000 
012701 
017700 
020100 
001401 
104000 
012701 
005767 
001003 
062701 
000402 
062701 
01770 0 
020001 
001401 
1Q4000 
104H14 
005777 
001401 
104002 
012777 
013777 
012777 
105777 
100375 



166042 



INCU: 



001J02 166036 6S: 

166124 166026 

000071 166014 
166010 5S: 

100000 166014 



150600 166000 



144270 165754 



165746 
166012 
000100 



177700 

165722 IS: 



024550 
165762 

000200 

000400 2S: 
165666 3S: 



165660 



177500 165636 

001102 165632 

000061 165616 
165612 4S: 



'bTB 
Bfll 
HLT 
HOV 

nov 

MOV 

TSTB 

BPL 

cnp 

BEO 
HLT 
CMP 
SEQ 
HLT 
CMP 
BEQ 
HLT 
MOV 
MOV 
BIS 

cw 

BEQ 

HLT 

MOV 

MOV 

CMP 

BEQ 

HLT 

NOV 

TST 

BfC 

AOC 

BR 

ADO 

MOV 

C«P 

BEQ 

HLT 

CLROK 

TST 

BEQ 

HLT 

MOV 

MOV 

HOV 

TSTB 

BPL 



SRSCSi 

b% 

'CSl 

atOBUFSV.SRSBA 
W0RK2.aRSUC 

i7i.aftscsi 

SRS^Sl 
5S 

•100000, SRSER 
.+4 

'ER 

•150600. 3RS0S 

.+H 

!DS 

•144270, SRSCSi 
.+4 

!05!DR 

3RSCS2.efiD 

UNNUM.dOOD 

ilOO.&OOO 

QOOO.BAO 

•177700.GOOO 

srsuc.bAd 

GOOO.BAO 
.♦4 

•OUTBUF.GOOD 

RS04DT 

2S 

•200,0000 
3S 

•400.G0C0 
af^.BRD 

brd,g6oo 

.♦4 



aRSER 

.♦4 

'ER 

«177500,3RSMC 

atOBUFsC^.aRSSR 

I61.SRSC§1 

9RS6S1 

4S 
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15 BUSY CLEftRED 

FLfii CLEARED 

ROY NEVER CAME UP 

SET UP CURRENT ADDRESS 

LOAD UC 

GO READ 

IS ROY SET' 

WAIT FOR READ TO FINISH 

DID DCK SET' 

YES 

DCK DID NOT SET 
DID ERR SET' 
YES 

ER DID NOT SET BY DCK 
IS CSl CORRECT' 
YES 

;GET CS2 
GET UNIT • 
SET IR 

;IS CS2 CORRECT' 
;YES 

;N0 

I DID TRANSFER STOP AT END OF SECTOR' 

;YES 
iNO 

;GcT OA 

RS04» 

YES 
;RS03 

GET CORRECT AN5 FOR BA 
GET BA 

IS Bfi CORRECT' 

YES 

NO 

CLEAR AU RS REG 
DID OCK CLEAR' 
YES 

DCK DID NOT CLEAR UITH CLEAR 
CLEAR OCK ON 
DRIVE BY WRITING 
GOOD DATA 
ON DRIVE 



-hINDEC-H-DERSA-A 
DERSflfl.Pll TSTb7 

35E>8 
3Sb9 
3S70 
3571 
3572 



357M 
3575 
3S7S 
3577 

>7S 
3590 
3581 
3582 
3583 
3584 
3585 
3586 
3587 
3588 
3S8S 
£V 
3591 
35«S 
3593 
3594 
>9S 

3597 

3599 
3600 
3601 
3602 
3603 
3604 
3605 
3606 
3607 



3610 
3611 
3612 
3613 
3614 

Sil 

3617 



013274 104400 



013276 
013300 
013306 
013314 
013322 
013330 
013334 
013336 
013344 
3133% 



104414 
012777 
013777 
012777 
0a2777 
004767 
104001 
027727 
001401 
104004 



013350 104400 



01 ^ 

01 3370 
013376 
013404 



104414 
012777 
013777 
012777 
012777 
105777 
100401 
00D77H 
022777 
001401 
104002 
022777 
001401 
104140 




88l401 
104002 



RSil-RSC3-RS04 BASIC FUNCTION OlfiGNOSTIC 
TEST DCk IN RSER 



FOB 
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177777 
001102 
007777 
000061 
010722 



165602 
le>5576 
165572 
165554 



177777 
001102 
017777 
000061 
165474 



002000 
150600 
144260 

165440 



165526 
165522 

^^Hoo 



165476 
165462 
165436 



:TEST THE ABILITY OF THE DISK CONTROL TO 
; INCREMENT THE TRACK REGISTER. 

A ONE UORD WRITE UILL BE EXECUTED 
RSDA~7777 RSWC ~ -1 

AT THE COUPLET ION OF THE URITE RSDA = 10000 
TEST 70 TEST DISK ADDRESS REGISTER 

tST70: SCOPE 



165552 010000 5S: 



OKADR: CLROK 
NOV 
MOV 
MOV 
MOV 
JSR 
HLT 
CMP 
BEQ 
HLT 



1177777, 3RSUC 

aiOBUFS^.BRSBA 

•7777.SR§0A 

kbl.SASCSl 

PC.iWITRY 

'CSl 

9RS0A, 110000 

.♦4 

!Dfi 



CLEAR ALL RS REG 
SET UORO COUNT TO -I 
SET UP CURRENT ADDRESS 
SET RSOA TO ALL ONES 
GO WRITE ONE WORD 
WAIT FOR READY 
ROY DID NOT COME UP 
DOES RSDA=0 
RSDA OK 

DA DID MOT INCREMENT 



TEST 71 TEST lAE ERROR 

tST71: SCOPE 

;IAE ERROR SHOUtO SET ERR, ATA AfO SC BITS 



lAERR: 



71: 



CLRDK 

MOV §177777. ;«SHC 

MOV 9t08UFS<[.3RS8A 

MOV •i7777.aftSDA 

nOV •61.3Rk^Sl 

TSTB 9RS6S1 

BMI .+4 

BR 7S 

CMP 12000. 3RSER 

BEQ .-H 

HLT !ER 

CMP 1150600, 8R5DS 

BEQ .+4 

HLT !DS!AS 

CMP 1144260, aRSCSl 

BEQ .+4 

HLT !CS1 

CLROK 

TST 9RSER 

BEQ .-^4 

HLT JER 



CLEAR AU RS REG 
SET WC TO -1 
St UP BUS AOOfSSS 
SET OA TO RECEIVE ERROR 
GO URITE ONE WD 
TEST FOR ERR OR ROY 
OK CONT. 
WAIT 

DID lAE SET' 
YES 

lAE SHOULD BE SET 
DID ERR SET' 
YES 

ERR SHOULD BE SET 
DID SC SET' 
YES 

SC SHOULD BE SET 
CLEAR ALL RS REG 
CLR ERRORS' 
YES 

ERR DID NOT CLR WITH 40 IN CS2 




RSU-RSC3-RS04 BASIC FUNCTION DIftGNOSTIC 
TEST IflE ERROR 



G08 
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3b2S 
3S25 
3626 
3627 
3b2e 
2fe2S 
3&X 
3631 
3632 
3633 
3634 
3635 
3636 
3637 
3638 
3639 
3640 
3641 
3642 
3643 
3644 
3645 
36% 
3647 
3646 
364^ 



3652 
3653 
3654 
3655 
3656 
3657 
3658 
3659 
3660 
3661 
3662 
3663 



013464 104400 



013466 
013470 
013476 
013S00 
013506 
013510 
013512 
013516 

013526 
013532 
013536 
013540 
013542 
0135% 
013552 
013554 

013566 

013576 

013610 
013616 
013620 
013622 
013630 
013636 
013640 
013642 
013644 
013652 
013654 
013726 



104414 
012767 
005001 
036767 
001405 
005201 
006167 
103H52 
000767 
010177 
005077 
005777 
OOlHOl 
104040 
017700 
052701 
020100 
001401 
104000 
022777 
001401 
104s - 



4200 
005777 
001401 



032777 
001401 
104200 
0 17767 
032777 
001001 
104040 
000431 
032767 
001025 
104H02 
052767 



;IN THIS ROUTINE THE PROGRAM UILL GENERfiTE fl 
: NON-EXISTENT DISK ERROR 

TEST 72 TEST FOR NON=EXISTENT DISK ERROR 

tST72: SCOPE 



000401 
165474 

165462 



165360 
165362 
165362 



165340 
010100 



160200 
165324 



000100 
010000 



165266 
010000 



010000 

013660 
010000 



165502 
165452 



165316 



165334 
165270 



165350 
165250 



165312 
165230 



NEDTST: CLROK 
NOV 
CLR 

IJ: BIT 
BEQ 
INC 
ROL 
BCS 
BR 

3S: MOV 
CLR 
TST 
BEQ 
HLT 
MOV 
BIS 
CMP 
BEQ 
HLT 
CMP 
BEQ 
HLT 
TST 
BEQ 
HLT 
MOVB 
BIT 
BEQ 
HLT 
NOV 
BIT 
BNE 
HLT 
BR 

NEODON: BIT 
BNE 
TYPE 

NNOO: BIS 



»401,U0RK 
GOOD 

UORK.UNITSV 

3S 

GOOD 

UORK 

NEDDON 

G00D.aRSCS2 

SRSOA 

aRSER 

.+4 

!DS 

aRSCS2,BfV) 

iioioo!good 
gooo.bAo 

.♦4 

ftl60200.3R5CSl 

.♦4 

!CS2 

SRSAS 

.♦4 

'AS 

•lOO.aRSCSlB 
•NED aRSCS2 
.♦4 
!CS2 

ll€D,dRSCS2 
.♦H 

!0S 
NNOO 

•6IT12,0NCEE 
NNOO 

&BIT12,0NCEE 



CLEAR ALL RS REG 

SET UP FOR N.E.D. NUMKR 

LOOK FOR NON EXISTENT DRIVES 

ON THE SYSTEM 

FOUND NON EXISTENT DRIVE 

CONTAINS UNIT M 

KEEP LOOKING 

COULD NOT FIND ANY NON EXISTENT DRIVES 

LOOK FOR NED 

LOAD NED IN CS2 

URITE DRIVE REG 

DID ANY BITS SET IN RSER' 

NO 

UHY DID RSER CHANGE^ 

GET C52 

SET NED AfC IR 

IS CS2 CORRECT' 

YES 

GOOOsCORRECT CS2 BA0=CS2 

IS CSl CORRECT' 

YES 

TRE SHOULD SET BY NED ERROR 

DID ANY BITS SET' 

NO 

MHY DID AT BITS SET' 
CLEAR TRE 
DID NED CLEAR 

nIo DID NOT CLEAR 
READ DRIVE REG 
DID rCO SET? 

NED DID NOT SET 
GET OUT 

DUftS THIS TYPED BEFORE' 

yiiciZ <15><12>"C0ULD NOT FIND A NON-EXISTENT DRIVE' 
SET TYPED FLAG 



DERSPfl.Pli TS^"'3 



H08 



fiSil-RSCa-RSOM BASIC FUNCTION DiHGNOSTIC 
TE5T TH«T DfiO IN RSER AND LBT IN RSOS 00 SET 
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3bbM 
3b£>S 

3667 
3668 
366^ 
3670 
3671 

:&r2 

3673 
3674 
36 7S 
3676 
3677 
3678 
367«? 
3S80 
3681 
3682 
3683 
368H 
368S 
3686 
3687 
368B 
3683 
3690 
3691 
36S2 
3693 
369H 



0i373M lOMMOC 



013736 
013740 
0137% 
013752 
On75M 
013762 
013770 
013776 
014004 
014010 
014012 
01 4020 
014022 
014024 
014032 
014034 
014036 
014042 
014044 
0140% 
014050 
014056 
014060 
014062 
014066 
014070 



104414 
012777 
005767 
001003 
012777 
012777 
013777 
012777 
004767 
104001 
022777 
001401 
104002 
022777 
001401 
104040 
005777 
100401 
104001 
104414 
022777 
001401 
104040 
005777 
001401 
104002 



177577 
165214 

177677 
007777 
001102 
000061 
010246 

001000 



152600 
165042 

010600 
165032 



;TEST 73 TEST THAT OAO IN RSER AND LBT IN R3DS DO SET 

tST73: SCOPE 



165142 



165126 
165124 
165114 
165100 



165100 
165Go4 



165040 



OfiOTST: CLROK 
MOV 
TST 
BNE 
NOV 

IS: NOV 
2S: NOV 
NOV 
JSR 
HLT 
CNP 
BEQ 
HLT 
CNP 
BEQ 
HLT 
TST 
BNI 
HLT 
CLRDK 
CNP 
BEQ 
HLT 
TST 
BEQ 
HLT 



•-201.aRSUC 

RS040T 

IS 

1*101, 8RSUC 

•7777.aRSDfi 

aiOBU^SV.SRSBA 

•61,aRSC^l 

PC.tWITRY 

•CSl 

tl000,3RSER 

.+4 

'ER 

il52600,aR5DS 

.+4 

•OS 

SRSCSl 

.+4 

•CSl 

•10600, SRSOS 

.♦4 

!DS 

SRSER 

>4 

!ER 



CLEAR ALL RS REG 
LOAD UC FOR R504 
IS THIS A RS047 
YES 
NO 

STT RS0A=T0 ALL ONES 
CURRENT AOORESSsOUTBUF 
URITE 

i4AIT FOR READY 
RDY DID NOT SET 
DID OAO SET' 
YES 

OAO DID NOT SET 
DID LBT SET' 
YES 

LBT DID NOT SET 
IS ERROR FLAG SET 
ERROR IS SET 
SC DID NOT SET 
CLEAR ALL RS REG 
DID ATA +LflT CLEAR 
YES 

ATA DID NOT CLEAR BY CLR BIT 

DID OAO CLEAR' 

YES 

DAG DID NOT CLEAR WITH CLEAR 



108 



rERSAA.Pli TS'^rs 



36SS 
3b% 
3697 
3&<)8 
3&99 
37C0 
3701 
3702 
3703 
3704 
3705 
2708 
37P7 
37U8 
3709 
3710 
3711 
3712 
3713 
3714 
3715 
3716 
3717 
3718 
3719 
3"'20 
3721 
3722 



01 4072 104400 



014074 
01407b 
014104 
014110 
014112 
014120 
01412& 
014134 
014142 
0141% 
014150 
014154 
014156 
014160 
014166 
014170 
014172 
014176 
014200 
014202 
014204 
014212 
014214 



104414 
012777 
005767 
001003 
012777 
012777 
013777 
012777 
004767 
104001 
005777 
001401 
104002 
022777 
001401 
104040 
005777 
100001 
1040C1 
104414 
022777 
001401 
104040 



R5U-R£C3-RS0« BftSIC FUNCTION DIfiGNOSTIC 
TE5"^ THAT LBT DOES SET AND DftO DOES NOT 
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177601 
165056 

177701 
007777 
001102 
000061 
010110 

164744 



012600 
164706 



TEST 74 TEST THfiT LBT DOES SET AND DOC DOES NOT 

tST74: SCOPE 



165004 



164770 
164766 
164756 
164742 



164730 



010600 164704 



DflOTT: CLRDK 
MOV 
TST 
BNE 
MOV 

II: MOV 
2$: MOV 
MOV 
JSR 
HLT 
TST 
BEQ 
HLT 
CMP 
BEQ 
HLT 
TST 
BPL 
HLT 
CLRDK 
CMP 
BEQ 
HLT 



•-l77.aRSWC 

RS04Dt 

IS 

•777>.aRS0ft 

aiOBU^SV.SRSBA 

«61.9RSC5l 

PC.WfllTRY 

!CS1 

aRSER 

.+4 

'ER 

112600, aRSDS 

.+4 

!DS 

aRSCSl 

.+4 

•CSl 

•10600, aRSDS 
.♦4 

!DS 



CLEAR PLL R5 REG 
LOAD UC FOR RS04 
IS THIS A RS04' 
YES 
NO 

SET RSOAsTO ALL ONES 
CURRENT A00RE55=0UTBUF 
WRITE 

UflIT FOR READY 
ROY DID NOT SET 
ANY ERRORS' 
NO 
YES 

DID LBT SET' 
YES 

LBT DID NOT SET 
IS ERROR FLAG SET 
NO 

ERROR 

CLEAR ALL RS REG 
DID LBT CLEAR 
YES 

ATA DID NOT CLEAR BY CLR BIT 



P'^IflO£C-n-D£R5fi-fl 
OERSAfl.PU TST^S 



RSil-RSCj-RSOH BASIC FUNCTION DIAGNOSTIC 
EXECUTE FUNCTION UITH ERROR BITS SET 



JOS 
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37?3 




















37?S 












104400 

AU f ■ WW 






3727 












014220 








37M 


□m222 


□12777 


177017 

A « • W A ' 


164670 

A 0 'W* w 


3730 


014230 


017700 

W* • ■ WW 


164666 

AW 'WWW 




3731 




016701 

WAW' WA 


' 64722 




3732 


014240 


042701 

W Ik • W A 


177400 

A ■ * IWW 




3733 


014244 


020100 

WfcW A V#W 






373S 


0142% 


001401 

A ■ W A 






Q142SQ 


104100 

AW ■ A WW 






37* 


om?52 


022777 


104200 

AU "bUU 


164624 


3737 




001401 

A (W A 






3738 


0142t»2 


104040 

AW 'W 'W 






3739 


WA "to « 


016777 


164672 

A W IW* b 

164624 

A W T wb ■ 


164630 

AW UwW 


3740 


014272 


0Ds777 




3741 


014276 


001401 

UW A (VJ A 






37H2 


014300 


A U 1 A WW 






37M3 










37H4 


014302 


022777 


004200 


164574 

Aw »J« » 


37HS 


014310 

WA *wAW 


001401 

WW A ■ W A 






37y6 


014312 


AW 1 Www 






37H7 


014314 


012767 

WA b • W 


177777 


010226 


3748 


014322 


013777 


001102 

WW A A Wb 


164S62 


37Hg 


014330 


012777 


177777 


164552 

AW iW^b 


3750 


014336 


012777 

WAW ■ ■ 


000071 

WW WW* A 


164540 


37S1 


Q14344 


032777 


OODDQl 

WW WWW A 


164532 

AW iWWb 


3752 


014352 


CX]140l 






3753 


014354 


104001 






3754 


01^356 


105777 


164522 




3755 


014362 


100375 






3756 


014364 


022777 


144270 


164512 


3757 


014372 


001401 






3758 


014374 


104002 







;TEST 75 EXECUTE FUNCTION UITH ERROR BITS SET 

tST75: SCOPE 



ERTST: 



IS: 



CLRDK 

MOV •1770i7,aRSER 

NOV SRSAS.BAO 

KOV UNCMP.COOD 

BIC 1177460.0000 

CMP GOOD.BflO 

BEQ .+4 

HLT ' fiS 

CMP M104200,3RSCS1 

BEO .+4 

HLT !DS 

MOV UNCMP.SRSflS 

TST 3RSflS 

BEO .+4 

HLT !fiS 

CMP 14200, aRSCSl 

BEQ .+4 

HLT !ER 

MOV 1177777, OUTBUF 

MOV StOBUFSV.aRSBA 

MOV l-l.SRSU^ 

MOV •7i'aRSCSl 

BIT tl.dRSCSl 
BEQ 

HLT !CS1 

TSTB SRSCSl 

BPL If 

CMP 1144270, aRSCSl 

BEO .+4 

HLT JER 



CLEAR ALL RS REG 

LOAO ER 

GET AS REG 

GET UNIT ATA BIT 

CLEAR JUNK 

IS AS REG CORRECT' 

YES 

AS BIT SHOULD BE SET 
DID ERRS SET IN CSl' 
YES 

CSl SHOULD =104200 
CLEAR ATA BIT 
DID IT CLEAR' 
YES 

COULD NOT CLEAR AS BIT 
BY LOADING A 1 INTO IT 
DID SC CLEAR BY 
CLEARING ATA 
NO 

DATA TO BE XT' RED 

SET UP CURRENr ADDRESS 

LOAO UC UITH -1 

DO READ FUNCTION 

DID GO BIT aEAR 

YES 

GO BIT SHOULD BE CLEARED 

UAIT FOR READY 

UAIT 

DID ERRS CLEAR BY SETTING GO BIT' 

YES 

NO 



KQ8 



3759 
37b0 
37&1 
37£»2 
37b3 
37&4 
37W 
3768 
3767 
37b8 
3769 

3770 
3771 
3772 
3773 
377M 
3775 



3778 
3779 
3780 
3781 
37BS 



0H376 
014402 
014406 
014412 
014«14 
014416 
014420 
014426 
014430 
014432 
014440 

814442 
14444 
0144S0 
014452 
014454 
014462 
014%4 
014466 
01447M 
014476 
014500 
014506 
014510 



TST75 

017700 
012701 
056701 
020100 
001401 
104000 
022777 
001401 
104040 
022777 
001401 

m 

001401 



.»3: 

001401 
104020 
036777 
001X1 
104100 
022777 
001401 
10H0G2 



RSU-R£C3-R5gM BASIC FUNCTION DIflGNQ 
EXECLlTg FUNCTION WITH ERROR BITS SET 



flCNQSTIC 



164504 
OCllOG 
164544 



150600 164470 

177777 164450 
164444 

001102 164430 

16HH7Q 16H426 

177017 164412 



hUV 3RSCS2,BflD 

nov 11100,6000 

BIS UNNUn.GOOD 

cnp GOOO.SflO 

BEQ .+4 
HLT 

CnP • 1 50600, SRSOS 

BEQ .-^4 

HLT !DS 

CnP i-l,aR5UC 

BEQ ,+4 

HLT !WC 

TST aRSDA 

BEQ .+4 

HLT !Dfl 

CMP aiOBUFSV,3RSBA 

BEQ .+4 

HLT • Bfl 

BIT UNCMP.SRSAS 

BNE .+4 

HLT • flS 

CMP 1177017, aRSER 

BEQ .+H 

HLT !ER 
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GET CS2 

GET CORRECT flNS 

GET UNIT I 

IS CS2 CORRECT' 

YES 

GOOD = UHRT C52 SHOULD = 

DID ERR BITS SET' 

NO 

ERR BIT SHOULD BE 1 

DID UC MOVE' 

NO 

WC SHOULD = 1777777 

DID DA MOV 

NO 

DA SHOULD =0 
DID Bfl MOVE 
NO 

Bfl MOVED 

flS SHOULD BE SET 

IS IT' 

NO 

DID ER CHANGE' 
NO 

ER SHOULD NOT CHANGE 



L08 



n;iNOEC-ll-DERSA-fl 
OERSfiA.Pll TST76 



RS11-RS03-RS04 BPSIC FUNCTION DIAGNOSTIC 
PflT AND nCF»E TEST 
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37| 

3787 

37B8 

3789 

3790 

3791 

3792 

3793 

279S 

3795 

37% 

3797 

3798 

3799 

38G0 

3801 

3802 

3803 

380M 

380S 

380b 

3907 

3808 

3809 

3810 

3811 

3812 

3813 

3814 

3815 

381& 

3817 

3818 

3319 



01H512 lOHMOO 



014514 
01451& 

014534 
014540 
014544 
01454£, 
014550 
014552 
0145S0 
01456& 
014570 
014572 
01457b 
014b02 
Q14b0b 
014blO 
014bl2 
OlHbH 
014b32 
014624 
014b2b 
014630 
014b3b 
014640 
01%4£ 
014646 
014652 
014b5b 
014bb0 
0:4bb2 



104414 
052777 
005777 
017700 
012701 
05b701 
020100 
001401 
104000 
012777 
022777 
001401 
104140 
017700 
016701 
042701 
020100 
001401 
1041D0 
022777 
001401 
1C40H0 
104414 
022777 
001401 
104002 
017700 
016701 
052701 
020100 
001401 
104000 



lb424a 
164304 
000100 



;TEST 7b PAT AND PICPE TEST 

tST7b: SCOPE 



000020 Ib43b2 

164400 

lb4352 

000120 

164412 



000010 lb4350 
000010 164332 



PATST: 



lb4324 
164360 
177400 



104200 164262 



004200 164246 



CLRDK 

BIS 

TST 

MOV 

MOV 

BIS 

CMP 

BEQ 

HLT 

MOV 

CMP 

BEQ 

HLT 

MOV 

MOV 

BIC 

CMP 

BEQ 

HLT 

CMP 

BEQ 

HLT 

CLRDK 

CMP 

BEQ 

HLT 

MOV 

MOV 

BIS 

CMP 

BEQ 

HLT 



IBIT4,3RSCS2 
SRSMR 

aRSCS2.BAD 
1120, GOOD 
UNNUfl.GOOD 

gooo,6ao 

.+4 

MIO.SRSMR 
110 3R5ER 
.+4 

!AS!DS 

srsas.bad 
uncmpIgood 

•177400.GOOD 
GOOD, BAD 
.+4 
'AS 

«104200,aR5CSl 

.♦4 

!DS 

M4200,9RSCS1 

.+4 

!ER 

SRSCS2.BA0 
UNNUM.GOOO 
tl00,600D 
GOOD BAD 
.+4 



CLEAR ALL RS REG 
SET PAT 

READ DRIVE REG 
GET CS2 
MOPE SHOULD 
NOT SET 

IS CS2 CORRECT' 
YES 

BAD = CS2 GOOD = CORRECT ANS 
CAUSE PAR TO SET IN RSER 
DID PAR SET' 
YES 

GET AS REG 

GET UNIT ATA BIT 

CLEAR JUNK 

IS AS REG CORRECT' 

YES 

AS BIT SHOULD BE SET 
DID ERRS SET IN CSl' 
YES 

CSl SHOULD :104200 
CLEAR RS REG 
IS CSl CORRECT' 
CLEARING ATA 
NO 

CHECK TO SEE 
IF PAT CLEARS 



;PAT DID NOT CLEAR 



«;iNOEC-ll-D£RSfl-fl 
OERSJW.Pll TST77 



RS11-RSC3-RS04 BASIC FUNCTION DIAGNOSTIC 
SET PPT BIT ANO LOAD FUNCTION 
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3820 

3821 

3822 

3823 

382H 

3825 

3826 

3827 

3828 

382<3 

3830 

2831 

3832 

3833 

^3M 

3835 

383S 

3837 

3838 

3839 

3840 

3841 

3842 

3843 

3844 

3845 

3846 

3847 

3848 

3849 

3850 

3851 

3852 

3853 

3854 

3855 

3856 

3857 

3656 

3859 

3860 

3861 

3862 

3863 

3864 

3865 

3866 



014664 104400 



:««ft«ft«»«ff«««««««««f«i«««««ftf«««#»««f««»»»f«««*f«f ««»««««««««««»««««««««« 

•TEST 77 SET PAT BIT AND LOAD FUNCTION 

tST77: SCOPE 



014666 
014670 
014676 
014704 
014712 
014720 
014726 
014734 
014740 
014742 
014750 
014752 
014754 
014762 
014764 
014766 
014774 
014776 



015000 
Q15002 
015004 
015012 
015020 
015026 
015034 
015042 
015044 
015052 

015066 
015070 
015072 
015076 
015102 
015106 
015110 
015112 



104414 
052777 
012767 
013777 
012777 
052777 
012777 
105777 
100375 
022777 
001401 
104040 
023777 
001401 
104020 
022777 
001401 
104010 



000010 
177777 
001102 
177000 
000020 
000071 
164144 

144270 



001102 
177000 



164210 
007644 
164200 
164170 
164160 
164150 



164134 
164130 
164114 



SETPAT: CLRDK 
BIS 
MOV 
MOV 
MOV 
BIS 
MOV 

H: TfJB 
Btl 
CMP 
BEG 
HLT 
CMP 
BEQ 
HLT 
CMP 
BEQ 
HLT 



iBAI.9RSC52 
•177^77, OUTBUF 
atOBUFSV.aRSBA 

i>iooo.aAst4c 

lBIT4.aRSCS2 

»7i.aftscsi 
aRscsi 

IS 

1144270, aRSCSl 
.+4 

!DS 

aiOBUFSV.aRSBA 

.+4 

'BA 

i-iooo.aRsuc 

.+4 
!UC 



CLEAR ALL REG 
SET BAI 

DATA TO BE XFERED 

SET UP CURRENT ADDRESS 

LOAD MC UITH -1 

SET PAT BIT 

DO READ FUNCTION 

UAIT FOR READY 

UAIT 

DID CSl GET LOADED' 
NO 

IT SHOULD NOT 
DID BA nOMV 
NO 
YES 

DID UC MOVE' 
NO 

YES MHY' 



•TEST 100 DO FUNCTION THEN SET PAT BIT 



104400 






tSTlOOi SCOPE 


104414 






FUNDO: 


CLRDK 


052777 


000010 


164074 




BIS 


012767 


1777T7 


007530 




MOV 


013777 


001102 


164064 




MOV 


012777 


177000 


164054 




MOV 


012777 


000071 


164042 


3S: 


MOV 


100774 








BMI 


052777 


000020 


164034 




BIS 


105777 


164026 




2S: 


TSTB 


loam 








BFL 


022f77 


144270 


164016 




CMP 


001401 








BEQ 


104002 








HLT 


017700 


164010 






MOV 


012701 


000730 






MOV 


056701 


164050 






BIS 


020100 








CMP 


001401 








BEQ 


104000 








HLT 



I6AIJRSCS2 

•177777. OUTBUF 

SttOBUFsC'.aRSBA 

t-lOOO.aRSUC 

t71,aR§CSl 

3S 

•BIT4,aRSCS2 

3RSCS1 

2S 

•144270,3RSCS1 
.♦4 

!ER 

3RSCS2.BAD 
1730, g60D 
UNNUH.GCOO 
GOOD, BAD 
.+4 



CLEAR ALL REG 
SET BAI 

DATA TO BE XFERED 
SET UP CURRENT ADDRESS 
LOAD WC UITH -1 
DO A READ 
WAIT FOR BUSY 



SET PAT 
UAIT FOR 



READY 



DID MCPE SET? 

NO 

YES 

GET CS2 

GET CORRECT ANS 
GET UNIT I 
IS CS2 CORRECT' 
YES 

GOOD = UHAT CS2 SHOULD = 



f1^IN0£C-ll-D£RSfl-A 
OERSM.PU TSTIOO 



RS11-RSC3-RS04 BASIC FUNCTION DIAGNOSTIC 
DO FUNCTION THEN SET PAT BIT 



N08 



3887 
38&8 
3869 

Wi 

3872 
3873 
387M 
3875 
3876 
3877 
2878 
387S 
3880 
3881 
3882 
3883 
388M 
398S 
38eb 
3887 
3888 



3898 

38sq 

3900 
3901 
3802 
3803 
3804 
3805 
3808 
3907 
3808 
3908 
3910 
3911 
3912 
3813 
3914 
3915 



015114 022777 010600 

015122 001401 

015124 104040 

015126 QQS777 163766 

015132 001401 

015134 104044 

015136 104414 

015140 022777 004200 

015146 001401 

01515C 104040 



163774 



163736 



CNP 110600, SRSD5 

BEO .+4 

HLT IDS 

T5T aRSER 

BEQ .-^4 

HLT !0S!DA 

CLRDK 

CflP 14200, 3RSC51 

BEQ .+4 

HLT IDS 
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DID ERR BITS SET' 
NO 

ERR BIT SHOULD BE I 
IS ER CLEAR' 
YES 

NO ERRORS SHOULD BE SET 
CLEAR ALL RS REG 
IS CSl CORRECT' 
YES 



015152 104400 



015154 
015156 
015164 
015172 

015200 
015206 
0J521M 

015220 
01S222 
015230 

JiS^36 
t^iS244 
ClS2% 
015250 
UiS2S4 
0iS260 
015264 

cisero 

015272 
015274 
015276 
015304 
015306 
015310 
C15316 
G15320 
015322 
015324 
015332 
015334 
015336 
015342 
015344 



104414 
052777 
012767 
013777 
Q12777 
012777 
105777 
100775 
052777 
1D5777 
100375 
022777 
001401 
104002 
017700 
012701 
056701 
042700 
020100 
001401 
104000 
022777 
001401 
104040 
022777 
001401 
104044 
104414 
022777 
001401 
104040 
005777 
001401 
104040 



;TEST 101 TEST PAR BY SETTING PAT 

:««««»««««««««««««««««««««««««»««»»«»««««««««««««»««««««#««««««««««««»««»« 

tSTlOl: SCOPE 



000010 
177777 
001102 
177000 
000061 
163664 

000020 
163650 



163722 
007356 
163712 
163702 
163670 



163656 



PATTST: 



IS: 



2S: 



144260 163640 



163632 
000230 
163672 
000100 



150600 
OCOOlO 

004200 
163556 



163612 
163602 

163552 



CLRDK 

BIS 

MOV 

nov 

MOV 

MOV 

TSTB 

BMI 

BIS 

TSTB 

BPL 

CMP 

BEQ 

HLT 

MOV 

MOV 

BIS 

BIC 

CMP 

BEQ 

HLT 

CMP 

BEQ 

HLT 

CMP 

BEQ . 

HLT 

CLRDK 

CMP 

BEQ 

HLT 

TST 

BEQ 

HLT 



tBAI.aRSCS2 
•177^77. OUTBUF 
3K0BUFSV.3RSBA 

i-iooo.sAsuc 

i61.SR5CSl 

3RS6S1 

IS 

•BIT4,aRSCS2 

aRscsl 

2S 

il44260,aRSCSl 

.+4 

!ER 

aRSCS2.BA0 

M230.GOOD 

UNNUfl.GOOD 

MBIT6!bAD 

GOOD, BAD 

.+4 

•150600, aRSOS 

.+4 

!D5 

•10, aRSER 
.+4 

!DS*0A 

«4200,aRSCSl 

.+4 

!DS 

aRSER 

.+4 

!DS 



CLEAR ALL RS REG 
ScT BAI 

DATA TO BE XFEREO 

SET UP CURRENT ADDRESS 

LOAD MC WITH -1 

DO MRITE FUNCTION 

WAIT FOR READY 

UAIT 

SET PAT 

UAIT FOR READY 

DID MCPE SET' 

NO 

YES 

GET CS2 

GET CORRECT ANS— DO NOT CHECK IR - REASON 50 CYC 
GET UNIT « 

CLEAR IR BIT FOR C52 COMPARE 

IS CS2 CORRECT' 

YES 

GOOD = UHAT CS2 SHOULD = 

DID ERR BITS SET' 

NO 

ERR BIT SHOULD BE 1 
DID PAR SET? 
YES 
NO 

CLEAR ALL RS REG 
IS CSl CORRECT? 
YES 

;DID PAR CLEAR' 
■YES 



OERSiM.PlI TSTiOS 



0153% lOMHOC 



C153S0 

01S37M 

015422 
015H2S 
0154X 
015H32 
0l5H?i 
D1&H2 

0154MM 
0154% 
015452 
0IS454 
015456 
0154{»0 
0I54B6 
01547C 




001401 



1040^ 

001401 
104040 
005777 
100001 
104001 
104414 
022777 
X140I 
104040 



55il-RSC3-RS04 BASIC FLKTICN DlfiuNCS^IC 
TEST T« ABILITY TO ^ILL THE LfiST SECTOR 



Bog 
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007777 
177700 
lt»3S74 

177600 
001102 
000061 
006634 

163470 



012600 
163432 



;'^EST 132 TEST THE ABILITY TO FILL THE LftST SECTOR 

:*t*t*t**ft**t*tff»«*«**t»**tftt«**fttttt«ft*ttftfittt«tftt#«f«*««ff*fttt**«**tt 

tSTl02: SCOPE 



163534 
163522 



163506 
163502 
I63%6 



163454 



LfiSTSC 



IS: 



010600 163430 



CLRDK 

MOV •7777,aRSDfi 

nov t-ioo.aRSwc 

TST R5040t 

BEO II 

nov •-200.aRSwc 

flOV aiOSUFSV.SRSBA 

nOV •61.3RSC§1 

J5R PC.iWITRY 

HLT !CSl 

TST 3RSER 

BEQ .^^4 

HLT 'ER 

CflP 112600. SRSOS 

BEQ >4 

HLT !D5 

TST aRSCSl 

BPL .+4 

HLT !CSi 

CLROK 

C«P 110600, aRSDS 

BEQ .-^4 

HLT !DS 



CLEAR ALL RS REG 
SET RSOAsTO ALL ONES 
UORD COUNT:- 100 
IS THIS A R504' 
NO 
YES 

CURRENT ADDPE55=0UT3UF 
URITE 

UAIT FOR READY 

ROY DID NOT SET 

DID ANY ERROR BITS SET' 

NO 

GOT AN ERROR 
DID LBT SET' 
YES 

LBT DID NOT SET 
IS ERROR FLAG SET 
ERROR IS SET 
SC DID NOT SET 
CLEAR ALL RS REG 
DID ATA ♦LBT CLEAR 
YES 

ATA DID NOT CLEAR BY CLR BIT 



«?5:i-«5S:3-R5C'* BASIC FUNCTION DiHiNOSTIC 
TEST THE ASILITY TO FILL THE L«ST SECTOR 



009 
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3%M 
3%5 
3%b 
3%7 

?i%a 

3970 
3971 
3972 
3973 
397H 
397S 
3976 
3977 
3978 
3979 
3980 
3981 
3982 
3963 
398S 
3985 
398b 
3987 
3988 
3989 
3990 



015M72 li3HH00 



8 



015M7M 
"IgTb 

015512 
015520 

ois53S 
gl55H2 

01555B 

oissTb 
gi5b04 

015612 
015620 
015624 
015626 
015634 
015640 
015642 
015650 
015652 
015660 
015664 
015670 

015700 
015704 
015712 
015716 
015720 
015726 
015730 
015736 



104414 
012767 
013777 
012777 
005767 
001003 
012777 
052777 
012777 
1K777 
100375 
005077 

013777 
012777 
05 2777 
012777 
105777 
10037S 
042777 
005767 
001404 

000403 
012767 
013701 
012721 
005021 

8813K 
005077 
013777 
005767 
001404 
012777 
000403 
012777 
012777 



177777 


007044 


uulluc 


loJ4Uu 


177600 


163370 


163442 




177700 


163354 


UUUUlU 




otno6i 


163334 


163330 




Ib^^Jc 




177777 


006760 


UUiluc 




177777 


163304 


txxnio 


163274 


000061 


163264 


tL.'iSL.n 




UUUUiU 




163326 




000200 


163330 


000100 


163320 


001102 




177777 




163302 




163210 




001102 


163200 


163250 




177600 


163162 


177700 


163152 


000051 


163140 



;FILL SECfOR UITH «LL ONES. 
;NOU WRITE 1ST UORO IN SECTOR 
I TEST REflAINiriG 63 UOROS FOR 0 

TEST 103 TEST FOR ZERO'S IN PRRTIfU. FILLED SECTOR 

tSTl03: SCOPE 



SECT: CLRDK 

nOV l-l.OUTBUF 

MOV 2l06uFSV.aRSBfl 

NOV i-200.3R§UC 

TST R5040T 

BNE SS 

nOV I-IOO.SRSUC 

5S: BIS •BRI.iRSC52 

NOV i61.dRSCSl 

3S: TSTB 3RS6S1 

BPL 3S 

CLR 3RSDR 

NOV l-KOUTBUF 

NOV SiOaiFSV.aRSBA 

NOV t>i,aRsuc 

BIS tlO 3RSC52 

NOV abllSRSCSl 

IS: TSTB 9RS6S1 

BPL IS 

BIC •10.8RSCS2 

TST RSO^T 

BEO 71 _ 

NOV 1200, UORK 
8S 

7S: NOV tlOO.UORK 

BS: NOV StOeUFSV.Rl 

NOV •-i,(Rl)+ 

6S: CLR (RIH 

DEC UOmc 

BTC 6S 

CLR 9RS0R 

NOV atOBUFSV.SRSBA 

TST RS040T 

BEQ 91 

NOV •-200,3RSUC 

BR lOS 

9$: NOV l-lOO.aRSUC 

lOS: NOV I51,5RSCS1 



CLEftR ALL RS REG 
PUT -INTO OUTBUF 
SET UP CURRENT ftODR 
LORD UC FOR RS04 
RSD4' 
YES 

SET WORD COUNT TO -100 

SET BRI BIT 

i4RITE 

IS ROY SET' 
NO 

SET D SK flO ORESS TO 0 
PUT 177777 INTn OUTBUF 
SET UP CURRENT ROOR 
SET WORD COUNT TO -1 
SET BRI BIT 
URITE 

IS ROY SET' 
NO 

CLEAR BAI BIT 

R504' 

NO 

YES 

CONT 

SET UP BUFFER 

GET STARTING ROD OF BUF 

LOAD FIRST UD UITH -1 

LOAD REST UITH 0 

DONE YET» 

NO 

SET DSK ADDRESS TO 0 

SET UP CURRENT AOOR 

RS04f 

NO 

YES 

CONT 

SET UORO COUNT TO -100 
URITE CHECK 



29Si 
39<JS 

3<W8 

-•300 
-•001 
1002 
•+003 
•♦OOM 
HOGS 

-foob 

4007 

Hooe 

•♦009 
40iO 
HOI I 

4013 
■♦214 
4D15 
HOlb 
-♦017 
•^018 
4019 
4020 



01 5744 

Ci5752 
015754 
0157M 
Ol57fe4 
015770 
01S772 
01577M 



032777 
001774 
016701 
052701 
01770C 
02010C 
X1401 
104002 



015776 10H400 



OlbOOO 
016002 
016010 
OlbOlb 
016024 
016032 



016036 
01604M 
016052 
016056 
016064 
016072 
016100 
016106 
016114 
016122 
016130 



104414 
016767 
012767 
012767 
012767 
C05737 



012767 
012727 
005037 
012737 
012737 
012737 
012737 
012737 
012737 
012737 
012702 



R5:i-9SC3-RS04 BASIC FUNCTION DIflGNOSTIC 
TEST FOR ZERO'S IN PARTIAL FILLED SECTOR 



009 



000200 163132 21: 

163176 
OCOlOO 
163116 



002460 
OOOQIO 
01^2 
000340 
177572 



016514 
007600 
172340 
000200 



177406 
177H06 
177406 
177406 
000001 
040000 



BIT 
BEG 
MOV 
BIS 
flOV 

cnp 

SEQ 
HLT 



•200,aRSCSl 
2S 

UNNUM.GOOO 

•loo.iooo 

SRSCi2.BAD 

cood.bAd 

!ER 
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IS ROY SET' 

NO 

GET UNIT I 
SET IR BIT 
GET CS2 

IS CSrCORRECT' 
YES 

THERE UAS A URITE CHECK ERROR 



:TE5T 104 IF riEnORY nANAQElCNT IS AVAILABLE CHECK THE EXTENDED NEtlCRY ADDR 

tSTlOH: SCOPE 



16316C 
0Q24cn 

161760 
161754 



161740 
1723S6 

172342 
17234M 
172300 
172302 
172304 
172316 
177572 



EXTTST: CLROK 
NOV 
«0v 
NOV 
NOV 
TST 



NOV 
NOV 
CLR 
NOV 
NOV 
MOV 
NOV 
NOV 
NOV 
NOV 
NOV 



times.tinsv 
iio.tInes 

•EXtTRP.4 
•340.6 
StSR6 



CLEAR ALL RS REG. 
SAVE LOOP • 
LOOP 10 TINES 
SETUP TINEOUT TRAP 



;IF HENDRY NANAGEMENT IS NOT 
; AVAILABLE THE PROGRAN UILL TRAP 
AfC TRANSFER TO END OF THE TEST 

•EXTRP.4 
•76O0.dlKIPAR7 
SiKIPARO 
•200.aiKIPARl 
•2006JIKIPAR2 

•HQ0«|i6.-4QOHf><^,SfKIPOR0 ;SET KIPDRO=RU UP 400 BLOCKS 
•4001256. -40Q-^-UP>RU atKIPORl SET KIPDR1=RU UP 400 BLOCKS 
•4001256. -400-i'UP-HW S«KIPDR2 SET KIP0R2=RU UP 400 BLOCKS 
1400*256. -400+UP+RH'a«KIPDR7 [SET KIPDR7=RH UP 400 BLOCKS 
•I.SVSRO ;TUftN ON NENORY flANAGENENT 

•46000, R2 R2 EQUALS BASE ADDR 



;OPEN I/O REGISTERS 
FREE FIRST 4K 
ENABLE SECOND 4K 



E09 



'5lNDeC-ii-0£RW-fl 



OERSftfl.PU 



TSTI04 



-♦032 
H033 

^SS 

403b 
4037 
4038 
433S 
HOHO 
404i 
4042 
4US3 
4044 
4045 
■40% 
4047 

HCS£ 
4153 
i054 
40S5 
4058 
4057 
-.358 
4059 
^ObO 
40fci 



01bl34 012712 

016140 012777 

Olbl% 012777 

OlblSM 012777 



QlblbZ 
Olblg 
OlblTO 
Qlbl7M 

01b202 
01b210 
01b2l2 
01b214 

01b21b 
01b22C 
01b22M 
01b232 
016240 

Qlb2% 
018252 
01b254 
Olba&O 
016282 
016264 
016266 
01627M 
01627b 
016300 
016302 
01630b 
016310 
016314 
016316 
016320 



105777 
100375 
005777 
100002 
1040% 
000447 
022777 
001402 
104002 
000441 

m 




OU 
012777 
012777 

105777 
100375 
005777 
100002 



022777 
001402 

022712 
001404 
012701 
011200 
104000 
0002HO 



RSil-R5C3-RS04 BASIC FUNCTION DlfliNOSTIC tlftCYU S7{72Z) 06-0CT-7b 

IF r!£HORY ^fiNAGEtlENT IS AVAILABLE CHECK THE EXTENDED NEHCRY ADDRESS BITS 



06:51 PAGE 109 



177777 
177776 
177777 
OOOObl 



162710 



162742 
162736 
162722 



7S: 



004660 162674 II: 
3S: 



177777 
177777 



162660 
162650 
162636 



1 62670 
177777 
177776 
000071 

163632 

162624 



00%70 162610 4S: 
SS: 



2S: 



nov 

NOV 

nov 



TSTB 

BPL 

TST 

BPL 

HLT 

BR 

CflP 

BEQ 

HLT 

BR 

CLR 

CLR 

NOV 

MOV 

flOV 

TSTB 
BPL 

Sk^ 

CAP 

BEQ 

HLT 

BR 

CHP 

BEQ 

MOV 

MOV 

HLT 

NOP 



•177777, (R2) 
I-2JRSHC 
•17>777.3RSBA 
I61,SRS6S1 



9R5CS1 
.-4 

3R5CS1 
IS 

!ER!0A!DS 
2S 

t4660,SRSCSl 

3S 

•ER 

2S 

(R2) 
3RS0A 

il77777,aRfflft 

t-S.SRSk 

i7i;9RSCSl 

aRSCSl 
.-4 

3RSCS1 
4S 

•4670, aRSCSl 

51 

•ER 

SS 

•177777, (R2) 

2S 

•177777.GO0O 
(R2).BA6 



INSERT PATTERN INTO 200000 
SETUP UORDCOUNT 
SETUP BUS AODR 

URITE TUO UOROS ON DISK. R5BA 
STARTS AT 177777 TO FORCE CARRY 
TO SET A16 
WAIT FOR READY 



STATUS ERROR AFTER 2 UORO URITE 
USING MEXO 
IS CSl CORRECT 
YES 

CS2 DID NOT COMPARE 

CLEAR LOCATION 200000 
SETUP DA 
SETUP BA 
SETUP UC 

REAOTUO UORDS INTO LOCATIONS 
177777 AND 200000. 
UAIT FOR READY 

ANY ERRORS? 
BRANCH IF NO 

ERROR OFTER READING 2 UORDS 

IS CSl CORRECT' 
YES 

CSl DID NOT COMPAR E 
READ STARTING AT 177777 
UAS DATA READ INTO LOCATION 
200000 CORRECTLY' - BRANCH IF YES 



;0ATA COMPARE ERROR AT 200000 



FOS 



DERSAft.PH 



40S2 
HObS 



4C 
M0b8 
H0b9 
-»070 
H071 
H072 
4073 
^7M 
4075 
407fc 
4077 
4078 
4G7«9 
H08Q 
4061 
4082 
4083 
4084 
4085 
4086 
4087 
4088 
4089 
4090 
40S1 
4092 
4093 
4094 
4095 
40% 
4097 
4098 
4099 
4 ICC 
4101 
4102 
4103 
4104 
^105 



8 



01E>322 

Si! 

018336 

016356 
016364 
016370 
016372 
016376 
016400 
0164Q2 
016410 
016M12 



T5T104 

104414 
012737 
012702 
012712 
012777 
012777 
0 12777 
105777 
1( 



100001 

IC " " 



QOIHOI 
104002 



016414 005012 



016416 
016424 
016430 
016436 
016444 
016450 
016452 
016456 
016460 
016462 
016%4 
016472 
016474 

016476 
016502 
016504 
016510 
016512 

016514 
016520 
Q1S522 
016524 
016530 
016536 



012777 
005077 
012777 
012777 
105777 
100375 
005777 
100002 
104002 
000414 
022777 
001401 
104002 

022712 
001404 
012701 
011200 
104000 

005037 
000401 
000240 
012706 
012767 
005067 



RSii-RSC3-R504 BASIC FUNCTION DIAGNOSTIC flACYll 27(732) 06-0CT-7b 

IF HEMORy MANAGEflENT IS AVAILABLE CHECK THE EXTENDED nEflORY ADDRESS BITS 



08: si PAGE 110 



00401 
04001 
177777 
177777 
177776 
000461 
162514 

162506 



177776 
1 62464 
177777 
000471 
162434 

162426 



177777 
177777 

177572 



000500 
000006 
161244 



172344 



162542 
162532 
162520 



EXTTl; 
7S: 



005260 162474 4S: 



162464 

162454 
162440 



005270 162412 US: 



12S: 



CLROK 

nov 
nov 
nov 
fiov 

MOV 

fiov 

TSTB 

BPL 

TST 

BPL 

HLT 

CflP 

BEQ 

HLT 



lOS: CLR 



MOV 

CLR 

MOV 

MOV 

TSTB 

BPL 

TST 

BPL 

HLT 

BR 

CMP 

BEQ 

HLT 



161246 



CMP 
BEQ 
NOV 
NOV 
HLT 



EXTRP: CLR 
BR 

EXTTRP: NOP 
EXTl: MOV 
HEMOUT: MOV 
CLR 



•4Q00.3iKIPAR2 

I40006.R2 

1177777, (R2) 

tl77777!3RSBA 

l-2,aRS^C 

l46l.aRSC51 

SRSC^l 

.-4 

SRSC51 

4J 

'ER 

s52&0,aRSCSl 

lOS 

•ER 

(R2) 

t-2.9RSUC 
aRS6A 

•l77777.aRS8A 
•471.aR§CSl 

aRSc^i 

.-4 

aRscsi 

US 
*ER 

EXTRP 

•5270,aRSCSl 

12S 

•ER 

•177777, (R2) 
EX TRP 

•177777.G000 
(R2).BA6 



atsRO 

EXTl 

1500, SP 

16,4 

6 



CLEAB flLu REG 

02 EmOLS THE dh3£ hDDR 
INSERT PATTERN INTO 40000C 
SETUP BUS ADDR 
LOAD UC 

SET BIT A16 AND URITE 
UAIT FOR READY 

ANY ERRORS' 
BRANCH IF NO 

ERROR AFTER READING 2 UORDS 

IS CSl CORRECT' 

BRANCH IF YES 

NO CSl DID NOT COflPARE 

READ STARTING AT 377777 

CLEAR LXATION 400000 

READ TWO WORDS STARTING AT 377777 

SETUP WC 

SETUP DA 

CLEAR A 17 SET A16,READ 
WAIT FOR READY 

ANY ERRORS' 
BRANCH IF NO 

ERROR WHILE READING TWO WORDS 

r CSl CORRECT' 
B. '}KH IF YES 

CSl DID NOT COMPARE 

READ STARTING AT 377777 

WAS DATA READ INTO LOCATION 400000 

CORRECTLY' - BRANCH IF YES 



;0ATA COMPARE ERROR AT 400000 IF 
RECEIVE0=0 - LOCATION WASN'T ACCESSED 
•TURN OFF MEMORY MANAGEMENT 

; UPDATE TEST NUMBERS 
•RESTORE STACK 



DEI 



C-H-DERSfl-fl 
.Pii TSTiOS 



8^ 

08 

m 

10 

11 

14 



HUB 
SUb 
Mil? 
4118 
4119 
4120 
4121 

41''"^ 

4125 
4i2C> 
4127 
4128 
M129 
4130 
4131 
4132 
4133 
413S 
4135 
4136 
4137 
4138 
413S 
4140 
4141 
4142 
4143 
4144 
4145 
414t) 
4147 
4148 
4149 
4150 
4151 



016542 104400 



016544 

016560 
016566 
016574 
016602 

016610 
016614 
016616 
016620 

8il^ 

016634 
016636 
016640 



104414 

m 

012777 
012737 
012777 
012767 
005367 
001375 
104001 
000167 



001401 
104001 



016640 104400 



016642 
0166% 
01665M 
016656 
016664 
016672 
016700 
016704 
016712 
016720 
016726 
016732 
016734 



016736 
016742 
016744 



012706 
016767 
104414 
012777 
012777 
012737 
013700 
012777 
013777 
012777 
004767 
104001 
000403 



012701 
104000 



G09 



3-RS04 BflSIC FUNCTION DlfliNOSTIC 

;ram interpupt by moving 300 into rscsi 
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TEST 105 TEST PROGRflPI INTERRUPT BY nOViNG 300 INTO RSCSl 

tSTlOS: SCOPE 



000530 
016624 
000340 
000200 
000300 
000500 
162364 



000014 



QES: 



000500 
162316 

016736 
000340 
000240 
177776 
177777 
001102 
000161 
00S324 



000240 



162360 
162354 
177776 
162302 
162370 



IS: 



CLRDK 
NOV 

nov 

MOV 

nov 

MOV 

nov 

DEC 
BNE 
HLT 

jnp 



004200 162250 



PGTRAP: CnP 
CMP 
BEQ 
HLT 

OESOON: 



•500.SP 

•PGTftftP.SRSVEC 

•340,aRSVCPS 

l200,attP5 

•300 aRSCSl 

1500, WORK 

UORK 

IS 

•CSl 
QESDON 

(b)+.(6)+ 

l420£l,aRSCSl 

.+4 

!CS1 



CLEAR ALL DRIVES 

SETUP STACK 

SET UP VECTOR 

SET TRAP PS 

SET PS AT PRIORITY 4 

THIS SHOULD CAUSE A TRAP 

SETUP LOOP 

DEC LOOP SHOULD 

INTERRUPE BEFORE LOOP IS DONE 

SHOULD NEVER GET HERE 

GET OUT 

;TRAP OK 
DID IE CLEAR' 
•YES 

•IE SHOULD BE CLEARED 



TEST 106 TEST THAT DISK DOES NOT INTERRUPT WHEN PS IS AT 5 

tST106: SCOPE 



001612 

162254 
162250 
177776 

162176 
162172 
162156 



INTR5: MOV 1500, SP 

MOV TIHSO, TIMES 
CLRDK 

HOV IINT112.aRSVEC 

NOV •340,aR|yCPS 

NOV 1240 

nov atPslBflO 

nov 1177^77, aRSWC 

nov StOBUFSi^.SRSBA 

nov •i6i.aRs6si 

JSR PC.HftlTRY 

HLT !C§1 

BR INTDON 
; PROCESSOR SHOULD NOT TRAP TO 



INT112: nov 
HLT 

INTDON: 



1240, GOOD 



SETUP STACK 
RESTORE LOOP COUNTER 
CLEAR ALL RS REG 
SET UP INTERRUPT VECTOR 
SET PRIO. 

LOCK OUT PLL INTERRUPTS ABOVE 
GET PS 

SET UORO COUNT TO -1 
LOAD CURRENT ADDRESS 
GO URITE (INTERRUPT ENABLED) 
UAIT FOR READY 
NO ROY NEVER CANE UP 
.RESTART ROUTINE 
INtll2 

;UHAT PS SHOULD HAVE 
GOOD = CORRECT ANS FOR PS 
DONE GET OUT 



H09 



7042 

7tm 

70% 
7050 
7056 
70bO 
7062 



.ERSAA.PH TST107 



4152 

M153 

4154 

4155 

4156 

-.137 

4158 

4159 

4160 

4Ifal 

4162 

4163 

4164 

4165 

4166 

4167 

4168 

4169 

4170 

4171 

4172 

4173 

4174 

4175 

4176 

4177 

4178 

4179 

4180 

4181 

4182 

4183 

4184 

4185 

4186 

4187 

4188 

4189 

4190 

4191 

4192 

4193 

4195 
41% 
4197 
4198 
4199 



RSil-R£C3-RS04 BASIC FUNCTION DIAGNOSTIC 
TEST THAT DISK DOES INTERRUPT UHEN PS IS AT 4 
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;TEST 107 TEST THAT DISK DOES INTERRUPT UHEN PS IS AT 4 

tST107: SCOPE 



016746 
016752 
016754 

8l677? 
016776 
017002 
017006 
017014 

017030 

8 

0. 
0. 
0. 
0 
0. 
0. 
0 



012706 
104414 
012777 
012777 
012737 
013700 
012701 
01 2777 
013777 
012777 
005067 

104000 
104042 
000405 
022777 
001401 
104001 



000500 

017050 
000340 
000200 
177776 
0 00200 
177777 
001102 
000161 
162144 
162140 



162156 
162152 
177776 



162074 
162070 
162054 



004260 162026 



INTR4: MOV 
CLROK 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
CLR 
INC 
BNE 
HLT 
HLT 
8R 

INT114: CMP 
BEQ 
HLT 

OONINT: 



t500,SP 

•INTll4.aRSVEC 

i340,aR§VCPS 

1200 SIPS 

aiPS.BAO 

I200.G00D 

•177^77, 2RSUC 

ai08UFS{^.aRSBA 

ii&i,aRs65i 

UORK 
UORK 
.-4 

!ER!DS 

OONINT 

•4260.aRSCSl 

.+4 

!CS1 



SETUP STACK 

CLEAR ALL RS REG 

SET UP DISK TRAP VECTOR 

SET PRIO. 

SET PROCESSOR TO PRIORITY 4 
GET PS 

GET CORRECT PS 
SET WORD COUNT TO -1 
LOAD CURRENT ADDRESS 
WRITE (INTERRUPT ENABLE 

WAIT FOR INTERRUPT TO OCCUR 

GOOO=CORRECT PS BAD-WRONG PS 

CONT 

DID IE CLEARS 
YES 

WHY DID NOT IE CLEAR 



•TEST 110 



TEST INTERRUPT ON ERROR 



017062 

017064 
017070 
017076 
017104 
017106 
017114 
017122 
017130 
017136 
017144 
017150 
017152 
017154 
017162 
017164 
017166 
017170 



104400 






tSTUO: SCOPE 


012706 


000500 




ERINT: 


NOV 


012737 


000200 


177776 




MOV 


012777 


0171S4 


162034 




MOV 


104414 








CLROK 


012777 


000340 


162026 




MOV 


012777 


177777 


161772 




MOV 


012777 


177600 


161760 




MOV 


013777 


001102 


161754 




MOV 


012777 


000161 


161740 




MOV 


004767 


005106 






JSR 


104042 






IS: 


HLT 


000406 








BR 


022777 


144260 


161722 


ERRINT: 


CMP 


001401 








BEQ 


104042 








HLT 


022626 








CMP 



FINTST: 



•SOO.SP 

•200!dlPS 

•ERRtNT.aRSVEC 

•340JRSVCPS 
•177777, SRSOA 
•177600! aRSWC 
asOBUFSC'.SRSBA 
•161.aRSCSl 
PC.wAlTRY 
! Eft! OS 
FINTST 

•144260, SRSCSl 
.♦4 

!ER!D5 



SETUP STACK 
SET PS AT PRI 4 
SET UPINTEfWUPT ADD. 
CLEAR ALL RS REG 
SET PRIO. 

Sn RS0A=T0 Aa ONES 
WORD C0UNT=-200 
CURRENT A0DRE5S=0UTBUF 
WRITE 

WAIT FOR READY 

Y DIDN'T PGM INTERRUPT IS ROY SET' 

GET OUT 

IS CSl RIGHT' 

YES 

CLEAR STACK 



OERSfiA.Pll TSTIH 
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CYNflMiC F'jNCTion test 



109 
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420S 
S205 
S206 
M207 
4208 
42OT 
4210 
4211 
4212 
4213 
4214 
4215 
4216 
4217 
4218 
4219 

4223 
422S 
422S 
4226 
4227 
4228 
4229 
4230 
4231 
4« ' 
4c 
4234 
4235 



42^ 
4239 
4240 
4241 
424a 
4243 
4244 
4245 
42% 
4247 



017170 104400 




017172 
017174 
01^ 
01^10 
017214 

017220 
017224 

8ip 

017242 
^J?2% 

017254 
017260 
017262 
017270 
017272 
017276 
017300 
017304 
01^ 
017314 
017316 
017320 
017324 
017326 
017334 
017342 
0173% 
017354 

017374 
017402 
017404 
017406 
017412 



104414 
016767 
012767 
005067 
005003 



n 

012767 
036767 
001403 
020%7 
001017 



006167 
103364 
032767 
001016 
016705 
OOSgOS 
042705 
000410 
052767 
010422 
005203 
01036 7 
00 0751 
01 277? 
012777 
005067 
013777 
012777 
012777 
012702 
012777 
005703 
001003 
010577 
000407 



001266 
000010 
161766 



020120 
000401 
161742 

161710 



161720 
000010 
161660 
177770 
000010 

161652 

017442 
0003M0 
005202 
001102 
177000 
000060 
^120 
000161 

161474 



;TEST 111 DYNAMIC FUNCTION TEST 

tSTlU: SCOPE 

: EXECUTE FUNCTION MODIFY UNIT • AND DO A DRIVE SEPRCH 
DRIVE SEARCH WILL ONLY BE DONE IF THERE ARE AT LEAST 2 DRIVES 
2N0 DRIVE MAY NOT BE TESTED YET SO IF THIS TEST FAILS CHECK 2ND DRIVE 
BEFORE TRYING TO DEBUG THIS TEST 



161766 
001256 



161746 
161720 



161712 



161666 8S: 



161604 
161600 

161536 
161526 
161524 

161502 



MODNUM: CLROK 
MOV 
MOV 
CLR 
CLR 
CLR 
MOV 
MOV 

7S: BIT 
BEQ 
CMP 
BNE 

6S: INC 
CLC 
ROL 
BCC 
BIT 
BtC 
MOV 
INC 
BIC 
BR 
BIS 
MOV 
INC 
NOV 
BR 

12S: HOV 

nov 

CLR 
MOV 
MOV 

IS: MOV 
MOV 
MOV 
TST 
BNE 
MOV 
BR 



TIMES.TIMSV 
llO.TtMES 

UORiS;i 

R3 

R4 

IDVTAB.R2 

1401, u6rk 
uork.unitsv 

6S 

R4,UNNUM 

8S 

R4 

MORK 
7$ 

•BIT3,W0RK1 
12S 

UNNUn,RS 

R5 ' 

1177770, R5 
12S 

•BIT3.U0RK1 

R4,(R2)^ 

R3 

R3,SAVEE 
6S 

•TSTVECJIRSVEC 

•34Q.aR§VCPS 

OUW 

aiOBUFsy.aRSBA 
i-iooo.a^ 

•6p.3R^ 
^tAB^ 

•161, a^i 

R3 
13S 

R5.aRSCS2 
14* 



; CLEAR AU RS REG 
;SAVE LOOP COUNT 
LOOP ONLY 10 TIMES 
•CLEAR UORK LOC. 



SETUP TABLE 

SETUP TO TEST FOR MORE DRIVES 

IS DRIVE ON SYSTEM' 

NO 

IS THIS THE SAME DRIVE' 
NO 

UPDATE 2ND UNIT • 

; CHECK FOR NEXT DRIVE 

NOT DONE YET 

MULTI DRIVE' 
I YES 

•LOAD UNIT NO 
CHANGE IT 
•CLEAR JUNK 

;SET FOUND MULTI DRIVE 

LOAD urrr • into table 

COUNT t OF DRIVES 
•SAVE IT 

SETUP INT. TRAP 

SETUP PRIO. 

CLR TO READ INTO 

SET UP CURRENT ADDRESS 

SET UORO COUNT 

LOAD OA 

GET Tf«LE 

GO URITE 

MORE THEN I DRIVE? 
YES 

NO MODIFY UNIT i 



•*^lNOEC-li-OERSfl-« 
OtRSAA.PU TSTlil 



RS11-RSC3-RS04 BASIC FUNCTION DIAGNOSTIC 
DYNflniC FUNCTION TEST 



M2M8 

H251 
4252 
4253 
4254 
4255 
4256 
4257 
4258 
4259 
426)0 
4261 

42tH 
4265 
4266 
4267 
4268 
4269 
4270 
4271 
4272 
4273 
4274 
4275 
4276 
4277 
4278 
4279 
4280 
4281 
4282 
4283 
4284 
4285 
4286 
4287 
4288 
4289 
4290 
4291 
4292 



017414 
017420 
017426 
017430 
017^2 
017440 
017442 
017»450 
017454 
017460 
017%4 
017466 
017470 
017472 
017474 
017500 
017502 
017504 
017510 
017514 
017S20 
017522 
017524 
017526 
017532 
017536 
017542 
017544 
017546 
017550 
0175S4 
017556 
017564 
017566 
017570 
017576 
017600 
017602 
017610 
017616 

m. 

017632 
017640 
017642 



012277 
012777 
005303 

m 

000001 
016777 
017700 
042700 
012701 
020100 
001402 
104000 
104140 
005777 
001401 
104010 
016701 
052701 
017700 
020100 
001401 
104000 
017700 
013701 
062701 
020001 
001401 
104000 
005767 

mioos 

022777 
001406 
104104 
022777 
001401 
1040% 
012777 
0^767 
001461 
012777 
012716 
012777 
000002 
000001 



161466 

000131 161456 



0C0200 

161510 
161430 
100000 
004260 



161410 



161446 
000100 
161366 



161360 
001102 
002000 



161412 
000070 

000064 



040000 
000010 

017644 
017642 
000100 



177776 
161436 



161330 

161316 

161274 
161364 

161312 

161244 



13S: NUV 
NOV 
DEC 
BNE 

14$: MOV 
UTOV: UAIT 
TSTVEC: MOV 
MOV 
BIG 
MOV 
CMP 
BEO 
HLT 
HLT 

41: TST 
BEQ 
HLT 
MOV 
BIS 
MOV 
CMP 
BEQ 
HLT 
MOV 
MOV 
ADD 
CMP 
BEO 
HLT 

2S: TST 
BfC 
CMP 
BEQ 

HLT 

5S: CNP 
BEQ 
HLT 

3S: nOV 
BIT 
BEQ 

IS: HOV 
MOV 
MOV 
RTI 

UT0V2: UAIT 



(R2)*.aRSCS2 

M131,«)RSCS1 

R3 

13S 

t200,aips 

UNNUM,aRSCS2 

SRSCSi.BflD 

IBIT15.BPD 

»4260.600D 

G000,8A0 

45 

•DS'fiS 

SRSUC 

.+4 

!UC 

UNNUM.GOOD 

il00.600D 

8RSC&2.6A0 

gooo,bAo 

.+4 

8R5BA.BA0 

StOBU^SV.QOOD 

t2000.G0dD 

bm),g6oo 

.♦4 

RS040T 

•^0,aRSOA 
3S 

!DA!A5 
•64,SRS0fl 

!Dfl!ER*0S 
iTRE.aRSCSl 
tBITd,UORKl 
HTDVl 

•TTVEC.aRSVEC 

•WTDV2l(SP) 

•100,afi5C51 
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;LOAD UNITI 
DO SEARCH 

;DONE ALL DRIVES YET' 

;N0 

•ENABLE INTERRUPTS 

GET 1ST DRIVE 
GET CSl 
CLEAR SC 
GET CORRECT ANS 
IS CSl CORRECT' 
NO! X-FER OK 

CSl SHOULD = 14270 OR 4270 
TEST UC 

UORD COUNT DID OVERFLOU 
SHOULD = 0 
GET CORRECT 
ANS OF CS2 
GET C52 

IS CSS CORRECT? 
YES 

GOOD - CORRECT ANS FOR CS2 

FETCH CURRENT ADDRESS 

UHAT RS6A SHOULD EQUAL 

UPDATE IT 

IS RSBA CORRECT 

YES EXECUTE CONTINUE 

RSBA FAILED TO INCREMENT 

IS THIS A RSOH^ 

YES 

IS OA CORRECT? 
YES 

DA NOT CORRECT 

UAS RSDA INCREMENTED 

RSDA OK 

RSDA SHOULD CONTAIN A 64 
CLEAR ALL ERRORS IF ANY 
NULTI DRIVE' 
NO 

SETUP INT FOR NEXT DRIVE 
GET UAIT 
SET IE 
RETURN 



'^;iNOEC-Ii-0ERSfl-fl 
DERSflfl.PH TSTIU 
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M29M 
4295 
42% 
M2<37 
4298 
4299 
4300 
4301 
4302 
4303 
4304 
4305 
4306 
4307 
4308 
4309 
4310 
4311 
4312 
4313 
4314 
4315 
4316 
4317 
4318 
4319 
4320 
4321 

4: : 

4323 
4324 
4325 
4326 
4327 
4328 
4329 
4330 
4331 
4; 
4 

4334 
4335 

4338 
4339 
4340 
4341 
4342 
4343 



017S44 
0178% 
017&50 
0l7B5b 
QlThbH 
017Se6 
017B70 
0l7b72 
017676 
017700 
017702 
017706 
017714 
017716 
017720 
017726 
017730 
017732 
017736 
017740 
0177% 
017754 
017760 
017762 
017770 
017774 
020002 



020040 
0200% 
020052 



020076 



m 

020104 
020112 



005002 
000241 
012767 
i7?7 






000241 
006167 
103367 
104100 
010277 
022777 
001401 
104140 
022777 
001401 
104140 
005367 
001411 
016777 
012777 
012716 
000002 
012737 
012706 
016777 
005077 
104400 

12737 
012767 
000137 



104400 
062767 
005567 
032737 
001004 
04402 
1370) 
1405 




SERVICE ROUTINE FOR SEARCH FUNCTIONS 



X0401 
161316 



161302 



161200 
110600 



104230 



161240 

161234 
000100 
017642 

000340 
000500 
161142 
161134 

161154 
000340 
000001 
001606 



000001 
160732 



020066 
000042 



000240 
001206 



161322 
161236 



tTVEC: 



IS: 



161202 
161 |56 



161154 
161130 



177776 
161136 



000450 
177776 
160746 



2S: 



MTDVl: 



nOOOON: 



OUT: 
.SBTTL 

DONE: 



CLR 
CLC 
MOV 
BIT 
BNE 
INC 
CLC 
ROL 
BCC 
HLT 
NOV 
CMP 
BEQ 
HLT 
CMP 
BEQ 
HLT 
DEC 
BEQ 
MOV 
MOV 
MOV 
RTI 
MOV 
MOV 
MOV 
CLR 
SCOPE 
MOV 
MOV 
MOV 
JMP 



R2 

»401,U0RK 
U0RK,aRSAS 
2S 
R2 

WORK 
IS 
•AS 

R2,aRSCS2 
•1 10600, aRSOS 
.+4 

'OS' AS 

•104230, aRSCSl 
.+4 

!AS!0S 
SAVEE 
WTDVl 

UORK.aRSAS 

•100, aRSCSl 
mo^z, (SP) 

•340,a»PS 
•SOO'SP 
RSVC^S.aRSVEC 

aRsvcp^ 

TIMSVJIMES 
•340.&^PS 
•l.ICNT 

3m T DVNV 

SDONE - BEa AND' SCOPE ROUTINE 



; CLEAR UNIT i 

;OID THIS DRIVE INT' 
YES 

; UPDATE UNIT I 



WHY DID WE INT WITH NO ATA'" 
GET DRIVE 
DID PIP CLEAR' 
YES 

PIP BIT DID NOT CLEAR 
DID SC SET' 
YES 

SC DID NOT SET 
COUNT i OF INT 
DONE YET' 
CLEAR AS 
SET IE 

RETURN TO WAIT 



; CLEAR STACK 
•RESTORE INT VECTOR 

:DONE 

; RESTORE LOOP COUNT 
RESTORE PS 
FUGE TEST NUMBERS 
TEST NEXT DRIVE 



020116 000000 
020120 000010 



SCOPE 

160740 ADD •1,PCNT42 

ADC pcfrr 

177570 BIT «SU10.a^SUR 

BNE 4S 

TYPE ..+2 

4S: MOV d«42,RQ 

BEQ SEND! 

SENOAD: 7,(0) 
000240 240,240,240 

SENDl: JMP a«BEGIN 

.TBIT: 0 

OVTAB: .BLKU 10 



TERMINATIONG SCOPE FOR LOOPING 
ADD 1 TO THE PASS COUNT 
MAKE IT DOUBLE PREC. 
RING THE BELL^ 
NO! 

.ASCIZ <BELL)<177> 
GET MONITOR ADDRESS 
IF NONE 

GO TO MONITOR 
SAVE ROOM FOR ACTll 
RETURN 

T BIT FLAG 



«^INOEC-ll-OERSfl-A 
OERSM.Pll 

4345 
H3% 



020212 
020214 

0202 20 
020224 

»32 

0202% 
020262 

020264 
020270 
020272 
C20274 



010446 
010546 
017605 
032705 
001002 

?^ 

001423 

iSioii 

116704 

1(55777 
100375 
005^ 
001370 
112577 
105777 
100375 
000753 
017646 
062766 
022666 
001006 
062705 
042705 
010566 
012605 
012604 
000002 



RS11-RS03-RS04 BASIC FUNCTION DIAGNOSTIC 
5TYPE - TTY TYPEOUT ROUTINE 



L09 
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000004 
177400 

000004 



000012 



.SBTTL 



STYPE - TTY TYPEOUT ROUTINE 



160615 

160610 160612 
160604 



160574 
160566 



000004 

000002 000006 
000004 



THIS ROUTINE IS USE TO TYPE ASCII MESSAGES ON THE TTY. THE 

CALL CAN BE IN ONE OF 3 FORMS: 1) "TYPE .AOg: - TYPES THE 

NESSAGE STARTING IN LOCATION -AOR:". 2) *TYPE .CHAR" - TYPES 
THE ASCII "CHAR-, AND 3) "PRINT ' <15><I2>"MESSAGE"> - TYPES 
THE MESSAGE UHICA IS INLINE ASCII. THE FILLER CHARACTER WHICH IS 
TYPED AFTER A LINE FEED IS IN FILCHR AND THE NUMBER OF FILLERS 
IS IN FILCHR+1. 



000002 
000001 
000004 



.TYPE: MOV 
MOV 
MOV 
BIT 
BNE 
MOV 

IJ: TSTB 
BEQ 
CMPB 
BNE 
MOVB 

5S: MOVB 
TSTB 
BPL 
DEC 
BNE 

4S: MOVB 
TSTB 
BPL 
BR 

2S: MOV 
ADD 
CMP 
BNE 
ADO 
BIC 
MOV 

3S: MOV 

MOV 
RTI 



R4,-(6) 
R5,-(b) 
a4fb).R5 
•177400, R5 
15 

4(6), R5 

(R5) 

2S 

tl2,(R5) 
4J 

FILCHR+1.R4 

FILCHR, atPB 

aTPS 

.-4 

R4 

5S 

(R5)4,aTPB 

aTPS 

.-4 
IS 

34(6), -(6) 
»2,6(&) 
(6U,4(6) 
3$ 

•2,R5 
•1 R5 

R5 4(6) 
(6J+,R5 
(6)+ R4 



SAVE RH 
SAVE R5 

GET ADDRESS TO BE TYPED 

IS IT A TYPEM' 

NO 

GET ADDRESS OF CHARACTER 

TERMINATOR' 

GET OUT IF SO 

IS THE CHAR A LINE FEED 

NO - GET OUT 

GET THE FILL COUNT 

TYPE A FILLER 

DONE YET' 

NO - WAIT 

DEC COUNT 

LOOP UNTIL 0 

LOAD AND TYPE THE CHARACTER 

IS THE PRINTER READY 

WAIT UNTIL IT IS 

GET THE NEXT CHARACTER 

GET ADDRESS TO BE TYPED 

ADO 2 TO THE ADDRESS 

IS IT .+2? 

NO 

ADD 2 TO THE ADDRESS 
^CK UP TO AN EVEN BYTE 
RESTORE ADDRESS 
RESTORE R5 
RESTORE R4 
RETURN 



f15IN0EC-ll-0£RSfl-fl 
OERSM.Pll 



438H 
438S 

4389 

4390 

4391 

4392 

4393 

4394 

439S 

43% 

4397 

4398 

4399 

4400 

4401 

44!?' 

4403 

4404 

4405 

440£> 

4407 

4408 

4409 

4410 

4411 

4413 

4413 

4414 

4" 15 

441b 

4417 

4418 

4419 

4420 

4421 

4422 

4423 

4424 

4425 



020276 
020304 
r20306 
020314 
020316 
020324 
0203tfc 
020330 
020334 
020342 
020346 
020352 
020354 
020356 
020362 
020364 
020372 
020374 
020400 
020402 
020410 
020412 
020420 
020424 
020430 
020436 

020440 
020444 
020452 
020456 
020460 
020464 



032737 
001404 
123767 
001453 
032737 
001045 
000416 
013746 
012737 
005737 
012637 
000422 
022626 
012637 
00OS2& 
032737 
001012 
105767 
001404 
12S767 
003013 
112767 
105267 
011667 
016737 
000002 

105267 
016737 
005767 
001760 
016716 
000002 



RSii-R£C3-fl£Q4 BASIC FUNCTION OlflGNOSTIC 
SSCOOE - SCOPE LOOP HANDLER 
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.SBTTL 



SSCOPE - SCOPE LOOP HANDLER 



000400 
177570 
040000 



000004 
020354 
177060 
000004 



000004 

004000 

160401 

000060 

000001 
160354 
160360 
160344 



160335 
160330 
160332 

160324 



177570 
160464 
177570 

000004 



160371 
160361 

177570 



;THIS ROUTINE HANDLES THE ITERATIONS. LOOPING. ERROR 
.•LOOPING, AND THE DISPLAYING OF THE TEST NUMBER. 
-SCOPE" IS PLACED BETWEEN EACH SUBTEST IN THE TEST AND 
RECORDS THE STARTING ADDRESS OF THE SUBTEST IN "LAD:" 



IS: 



4S: 



177570 3J: 



.SCOPE: BIT 
6EQ 
CNPB 
BEQ 
BIT 
BNE 
BR 
MOV 
MOV 
TST 
MOV 
BR 
CMP 
MOV 
BR 
BIT 
BNE 
TSTB 
BEQ 
CMPB 
BGT 
MOVB 
INCB 
MOV 
MOV 
RTI 



2S: 

.SVLAD: 



.KIT: 
177570 .OVER: 



020466 000100 



INCB 

MOV 

TST 

BEQ 

MOV 

RTI 



TIMES: 100 



iSU8,atSUR 
IS 

aiSURJCNT 
.OVER 

MSW14,atSUR 

.KIT 

3S 

i4$!ai4 

31177060 
(6)-^.ai4 
.SVLftD 

(6)'^ at4 
.KIT 

iSUll.atSUR 
.SVLA6 
ICNT+1 
2S 

TIMES, ICNT+1 
KIT 

•1, ICNT+1 

ICftT 

(6).LAD 

ICNt.aiDISPLAY 



ICNT+1 

ICNT.aiDISPLAY 

LAD 

.SVLAD 

LAD, (6) 



LOOP ON SPEC. TEST' 

NO LOOP ON SPEC. TEST 

ON RIGHT TEST' «SW7-0» 

NOT RIGHT TEST 

LOOP ON TEST' 

LOOP ON TEST IS SET 

SKIP - NOP FOR XOR TESTER 

PUSH 314 ON STACK 

SET FOR TIMEOUT 

ERROR ON XOR' 

POP STACK INTO at4 

NO ERROR - GO TO NEXT TEST 

CLEAR STACK 

POP STACK INTO ai4 

ERROR - LOOP ON TEST 

KILL ITERATIONS 

YES - KILL ITERATIONS 

FIRST ONE? 

BRANCH IF FIRST 

DONE? 

BRANCH IF NOT 
FIRST ITERATION 
COUNT TEST NUMBERS 
SAVE LOOP ADDRESS 

DISPLAY TEST NO. AND ITERATION COUNT 
RETURN 

INC THE ITERATION COUNT 
SET UP DISPLAY 
FIRST ONE' 
YES 

FUDGE RETURN ADDRESS 
FIXES PS 



;RUN 100 TIMES 



N09 



1^lND£C-ll-D£RSi^-H 
CERSAA.PU 



4M26 
SM27 

HM28 

4M31 
4M32 
4S33 
4^34 
4435 
4436 
4437 
4438 
4439 
4440 
4441 
4442 
44M3 
4444 
4445 
4446 
4447 
4448 
44M9 
4450 
4451 
4452 
4453 
4S54 
4455 
4456 
4457 



020470 
020476 
020500 
020504 
020510 
020516 
020520 
020530 
02Q53S 
020542 
020550 
020554 
020556 
020566 
020572 
020576 
020600 
020602 
020610 
020612 
D20616 
020620 



032737 
001402 
104402 
005267 
032737 
001025 
104402 
0 11667 
162767 
117767 
016746 
104404 
104402 
004767 
005737 
100001 
000000 
032737 
001003 
105067 
000002 
000167 



RSli-R503-R£Q4 BASIC FUNCTION DIPiNOSTIC 
JHlT - HLT ROUTINE J ERROR Ti-PEOUT) 
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000007 
160272 
C20000 



020524 
160256 
000002 
160244 
160236 

020562 
002752 
177570 



001000 
160163 
177614 



.SBTTL 



JHLT - HLT ROUTINE (ERROR TYPEOUT) 



THIS ROUTINE PRINTS OUT ERROR MESSAGES STARTING WITH THE 
ADDRESS OF THE "HLT". IT ALSO COUNTS THE NUMBER OF ERRORS 
AND HAS THE CAPABILITY OF LOOPING ON ERROR. BELL ON ERROR, 
"HALT" ON ERROR. AND INHIBIT TYPEOUTS. AN OPTIONAL ARGUMENT 
(HLT+3) WILL BE PLACED IN ".HLTC*:" FOR ADITIONAL TYPEOUTS. 



002000 177570 
177570 



.HLT: 
IS: 



160250 
000054 



2S: 



177570 



3S: 



BIT 

BEQ 

TYPE 

INC 

BIT 

BNE 

TYPE 

flOV 

SUB 

MOVB 

MOV 

TYPEO 

TYPE 

J3R 

TST 

BPL 

HALT 

BIT 

BNE 

CLRB 

RTI 

JMP 



i51410,3ilS14R 
IJ 

.BELL 

ERRORS 

tt5U13,3«SMR 

2S 

..+2 

(6),HLTADR 
«2,i^LTADR 
aHLTADR,.HLTCT 
HLTADR,-(6) 

^'C.RSREG 

avsuR 

.+4 

tt5U9,3«5UR 
3S 

ICNT+1 
.KIT 



020624 000000 



.HLTCT: 0 



BELL ON ERROR' 
NO - SKIP 
RING BELL 

COUNT THE NUMBER OF ERRORS 
SKIP TYPEOUT IF SET 
SKIP TYPEOUTS 
.ASCIZ <15><12> 

PUT ADDRESS OF INSTRUCTION ON STACK 
FUDGE ADDRESS 
GET HLT ARGUEMENT 
PUT HLTADR ON STACK 
TYPE STACK IN OCTAL 

Asriz " " 

GO TO USER ERROR ROUTINE 
HALT ON ERROR 
SKIP IF CONTINUE 
HALT ON ERROR! 

CHECK FOR INHIBIT LOOP ON ERROR 
SKIP IF LOOP ON ERROR 
CLEAR ITERATION COUNT 
RETURN 

LOOP ON TEST UNTIL NO ERRORS 
;HLT ARGUnENT 




•i:N:£:-i:-0£RSii-H 



^-458 
•♦•♦67 

H^ri 

-♦M73 
4M74 
•♦475 
H*47S 
»+M77 
HM7B 
4479 
4460 
4481 
4482 
44B3 
4494 
4495 
4496 
4487 
44m 

Tftn 

4490 
4491 
4492 
44^ 
449H 
4495 
44% 
4497 
449B 
4499 
4500 
'♦501 
4502 
4503 
4504 
4505 





0207( 
02C76H 
020770 
020772 
020776 
021000 
021002 
021010 
021012 



312767 
000411 
112^67 



0104% 
0105% 
016605 
012704 
105014 
000411 
105014 
032767 
X1004 
006105 
1061x4 
006105 
106114 
006105 
106114 
105714 
001402 

105767 
001402 

gSSi 

001002 
112724 
105014 
104402 
1^ 
lE04 
016666 



8 

01 6 
00^^ 



«55:: •h£:3-«5sC4 sflsic function dia^ncs'^ic 

S::"m. - OCTAL TY-PEOUT ROUTINE 



BIO 



nftMl i7<722, 06-CCT-7b 08:51 PfiiE 119 



.SBTTL 



lOCTfiL - OCTP.L TYPEOUT ROuTlNE 



:THIS ROUTINE IS USED TO TYPE AN OCTAL NUnBER ON THE TTY. IT UILL T^PE 

:A;.L 6 CHARACTERS. SUPPRESS LEADING ZEROES. OR TYPE THE 

:16 BITS. IT IS CAlLED VIA THE TYPOCT. TYpfilT, OR TYPOCS flACPO'S. 



170101 000160 
000001 XC150 



0 00142 
I7777r 



■2 0C013S 



000010 
021016 



000100 C0C1C4 



000056 
000052 

000C%0 
000041 

021016 

000060 

021016 

000002 000004 



021014 000012 





nwv 




On 


. IrCw. 


RR 




on 






PTTT' 






MOV 




nwv 




rivv 




nw » 








PR 


. r\L • 


Cl RR 




BIT 




otic 








R0L8 




RGL 
nvw 








R(y 




ROLR 




TSTB 












TSTB 

■ SIB 








SISfi 




ZNCi 




BNE 




CNP 




BNE 




nOVB 




CLRB 




TYPE 




MOV 




nov 




flOV 




NOV 




RTI 


.PR: 


.BLKU 



•170101,. PR 
.PTIT 
•1,.PR 
.♦b 
PR 

■-6,.PR*1 

R4,-(6) 
R5,-(6} 
10{6).R5 
•.FR*S,R4 

(4) 
.PRF 

(4) 

•100.. PR 

.PRF 

R5 

(4) 
R5 

(4) 

RS 

(4) 
(4> 
.*b 
.PR 
.PR 
.+6 

.PRL 

i.PR42,R4 
.+6 

••0,(4)+ 

(4) 

?6)+,R5 
{6)*,R4 
2(61,4(6) 
(6)+. (6) 



SET BIT FLAG AND lb. CHARACTER COUNT 
NOW TYPE IT IN BIT FORM 
SET ZERO FILL SWITCH 
SKIP 

SUPRESS LEADING ZERO'S 
SET COUNT 

PUSH R4 ON STACK 
PUSH R5 ON STACK 
GET THE DATA 

SET POINTER TO FIRST ASCII CHAR. 

CLEAR FIRST BYTE 

ROTATE FIRST BIT 

CLEAR BYTE OF CHARACTER 

BIT TYPING MODE' 

YES - SKIP 2 ROTATES 

ROTATE BIT INTO C 

PACK IT 

ROTATE BIT INTO C 
PACK IT 

ROTATE BIT INTO C 

PACK IT 

IS IT ZERO' 

SKIP INC 

SET FILL SWITCH 

CHECK FILL SWITCH 

SKIP BITSET 

MAKE INTO ASCII CHAR 

INC COUNT 

REPEAT 

EMPTY BUFFER' 
SKIP IFNOT 
LOAD 1 ZERO 
NULL TERMINATOR 
TYPE IT 

POP STACK INTO R5 
POP STACK INTO R4 
GET RIO OF 
DATA WORD 
RETURN 



{COUNT, SWITCH, AND OUTPUT BUFFER 



H50b 

H538 

4510 
"tSU 
•♦512 

45 i 3 

021040 012777 

"♦515 0210% 012777 

tSlb 021054 0100% 

H517 Q2lOSe 0101% 

4518 021060 010246 

4519 021062 0102% 

4520 021064 0104% 

4521 Sl066 0105% 

4522 021070 010667 

4523 021074 012777 

4524 021102 000000 
H52S 

4526 021104 C16706 

4527 DciUO QOSOOl 
4538 021112 005201 
4S29 021114 X1376 
45JQ 021116 012605 
4531 021120 012604 
•*532 021122 012603 

4533 021124 012602 

4534 021126 012601 

4535 021130 012600 
t536 021132 012737 

4537 021140 012737 

4538 0211% 104402 
453<3 021162 000002 
4540 

4541 021164 000000 

4542 021166 000776 
4543 

454« 021170 000000 

45"£ 221172 000024 



= 5:i-R=:3-'?524 BASIC FLNCTICN OIAGNOSTIC 
5=;~£«! - t'Ci.EP DOWN AND UP ROUTINES 



CIO 
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SPOUER - POUER OOUN AND UP ROUTINES 



;THIS IS THE POUER FAIL ROUTINE UHICH UIU SAVE ALL 
;THE GENERAL REGISTERS AND USER DEFINED REGISTERS THEN 
UAIT FOR POUER TO GO OOUN AND BE RESTORED. 
;IF THERE ISN'T ENOUGH TIME FOR SAVING ALL THE REGISTERS. 
;THE PROGRAM WILL HALT AT MLLUP'. 



021164 00C124 
000340 000120 



000074 

021104 000070 



000060 



.POWER: nOV 
NOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
HALT 



.PCWLP: 
IS: 



021040 000024 
0003«0 000026 
021152 



XC026 



MOV 

CLR 

INC 

BNE 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

TYPE 

RTI 



.ILLUP: HALT 
BR 

.SAVR6: 0 
.PUVEC; 24,26 



i.ILLUP.a.PUVEC 
l340,a.^UVECJ*2 

Rl,-(b) 
R2,-(6) 
R3,-(b) 
R4,-(b) 
R5,-(fe) 
SP..5flVRb 

•.powup,a.PuvEc 



.5AVR5,SP 

Rl 

Rl 

IS 

(fe)SR5 

(fe)*,R4 

(6)+,R3 

(fe)>,R2 

(b)+,Rl 

(b)+.RO 

•.POWER. 3124 

1340, St26 

..*2 



SET FOR FAST UP 
PRI0:7 

PUSH RO ON STACK 
PUSH Rl ON STACK 
PUSH R2 ON STACK 
PUSH R3 ON STACK 
PUSH R4 ON STACK 
PUSH R5 ON STACK 
SAVE SP 
SET UP VECTOR 
UAIT FOR PF 

GET SP 

WAIT LOOP FOR THE TTY 
WAIT FOR THE INC 
OF WORD 

INTO R5 
INTO R4 



POP STACK 
POP STACK 
POP STACK INTO R3 
POP STACK INTO R2 
POP STACK 
POP STACK 



INTO Rl 
INTO RO 

SET UP THE POUER OOUN VECTOR 
PRI0:7 

.ASCI2 a5><12>"P0WER- 
RETURN 

;T« POWER UP SEQUENCE UAS STARTED 
; BEFO;^ THE POUER DOWN WAS COMPLETE 

;PUT THE SP HERE 
•POWER UP VECTOR 



BASIC FUNCTION DIfl(iNC5'lC 

::'hl input routine 



DIO 




.SSTTL 
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H555 

s^^ 
4558 
•4559 
45{iO 
•4561 
H5b2 
45C>3 
H5t)M 
4565 
H5M> 
4567 
4568 
456*3 
4570 
4571 
4572 
4573 
4574 
4575 
4576 
4577 
4578 
4579 
4560 
•♦581 
4582 



0211 

Siiii6 

Q2I220 
32x224 
0212g 
021230 
021234 

M12M4 
0212% 
021250 
021252 
021254 
021256 
021260 
021262 
02iai4 
321266 
021272 
0212M 
021276 
021300 

021302 
021302 
021312 



:THIS ROUTINE CALLS RDLIN, INPUTS A LINE FROM THE TTy AND CONVERTS 
;IT INTO AN OCTAL NUMBER CiHICH IS THE FIRST WORD ON THE STACK. 



C1164& 

316666 Q0CC04 
010146 
010246 
010346 

005001 

012703 021420 

112302 

001417 

122702 000060 
003022 

oSIs^ 000067 



XCC02 



006002 
006101 
006102 
006101 
006102 
00610 1 
000757 

010166 000012 

012603 

012602 

01260 1 

000002 



104402 021306 
000740 



RDOCT' 


NOV 




10V 




nov 




MOV 




NOV 


41- 

• • • 


RDLIN 




CLR 




MOV 


It- 


MOVB 




BEQ 




CMPB 




BGT 




CMPB 




BLT 




ROR 




ROR 

i» vr» 




ROR 




ROL 




pm 




ROL 




ROL 




ROL 




BR 


2S: 


flOV 




NOV 




NOV 




NOV 




RTI 


3S: 




TYPE 




BR 



(6), -(b) 

4(b5,2;6) 

Rl.-lfe) 
R2.-(b) 

R3,-(£>) 

RI 

•INPUT.R3 

(3)+.rJ 

as 

t'O.RS 
3S 

1*7, R2 

3$ 

R2 

R2 

R2 

Rl 

R2 

Rl 

R2 

Rl 

IS 

Rl,12(&) 
C6W,R3 
(6)*,R2 
(6)^ Rl 



4s 



HOVE 
HOVE 



THE PC 
THE PS 
PUSH Rl ON STACK 
PUSH R2 ON STACK 
PUSH R3 ON STACK 
READ A LINE INTO INPUT 
INIT DATA UORO 
INIT POINTER 
GET A BYTE 
GET OUT IF ZERO 
CHECK FOR 0 OR GREATER 
ERROR - LESS THAN 0 
CHECK FOR 7 OR LESS 
ERROR - GREATER THAN 7 
GET 
INTO 

POSITION 
FIRST BIT 
GET 

SECOND BIT 
GET 

THIRD BIT 
LOOP 

SAVE THE RESULT 
POP STACK INTO R3 
POP STACK INTO R2 
POP STACK INTO Rl 
RETURN 



;.ASCIZ -9-<l5><12> 
:TRY AGAIN 



nAirC|C-ll-0£RSAH) 
OERSM.PU 




%03 




111527 

0013M7 
105065 
104402 
012bOS 
300002 

021420 000020 



021440 
021442 
0214% 
021452 
02145b 

m 

021472 
02147H 



011646 
lb271b 
01761b 
062716 
013607 

020276 



0206% 
021176 
021314 
023526 



RS:i-RSC3-R504 BASIC FUNCTION DIAGNOSTIC 
SRDLIN - "'"'Y INPUT ROUTINE 

.SBTTL 



ElO 



021420 
021440 

177560 

177562 
000200 
000177 



021360 



021370 
000015 

177777 
000012 



000002 
115060 
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5R0LIN - TTY INPUT ROUTINE 



THIS ROUTINE INPUTS fl LINE TERniNfiTED BY A RETURN INTO ADDRESS^ 
INPUT AND RETURNS fi LINE FEED. THE BUFFER HAS A NULL TERnifiATOR 
i INSTEAD OF THE RETLRN. RUBOUTS ARE HANDLED BY RETYPING 
THE LINE. BUFFER OVERFLOU ERRORS LIKE A RUBOUT. 



.RDLIN: 


nuv 


IS: 


njv 


cS: 


Lnr 




dew 




TCTO 




QSI 
HrL 




nOVD 




HTrR 




cupb 




BNE 


4S: 






TYPE 




BR 


3S: 


MOve 


TYPE 




CMPB 




BfC 




CLRB 




TYPE 




MOV 




RTI 



R5.-(b) 
•INPUT, R5 
•INPUTM6.,R5 
41 

31177560 
.-4 

31177562,(5) 
•2C0,(5) 
•177 (5) 
3S 

(5) ,«0 

115,(5)'^ 
2S 

-1(5) 

(6) +,R5 



SAVE R5 
GET ADDRESS 
BUFFER FULL' 
YES - TYPE 
WAIT FOR 
A CHARACTER 
GET CHARACTER 
GET RID OF JUNK 
IS IT A RUBOUT 
SKIP IF NOT 

.ASCIZ -'-<15><12> 
ZAP THE BUFFER AND i 
SET UP FOR TYPING 
ECHO IT 

CHECK FOR RETURN 
LOOP IF NOT RETURN 
ZAP RETURN (THE 15) 
TYPE A LINE FEED 
RESTORE R5 
RETURN 



.OOP 



INPUT: 
.SBTTL 



.BLKB 



16. :TTY INPUT AREA 

ITRAP - TRAP HANDLER 



;THIS ROUTINE DECODES A TRAP CALL AND JUMPS TO THE fiPROPRATE ^ 
SUBROUTINE. THE CALL IS A "TRAP^fT WHERE N IS A MULTIPLE OF 2. 
tIc -SEr MACRO HILL CREATE THE TABLE NEEDED. IT HAS TO 

jFOaOH THIS MACRO. 



.TRAP: MOV 
SUB 
MOV 
ADD 

.TRP: MOV 



(6). -(6) ;GET ADDRESS OF TRAP +2 

•2.t6) MAKE IT ADDRESS OF TRAP 

a(fe).(6) GET TRAP INSTRUCTION 

•.TR^+2-TRflP,(6) GET DATA AND MAKE IT AN OFFSET 
a(6)+,PC GO TO PROPER SUBROUTINE 



.SCOPE 

•TYPE 

.TYPEO 

.TYPES 

.RDOCT 

.ROLIN 

.CLROK 



SCOPE = 

TYPE = 

TYPEO = 

TYPES = 

RDOCT s 

RDLIN s 

CLROK s 



TRAP+0 

TRAP+2 

TRAP+4 

TRAP^ 

TRAP^IO 

TRAP+12 

TRAP+14 



(104400) 
(104402) 
(104404) 
(104406) 
(104410) 
(10M412) 
(104414) 



OeRSM.PlI 
%33 
%3S 

hI^ 021"76 01677 
%38 021504 017737 
021512 300771 

%40 

%42 02151M 016777 
%M3 021522 017737 
021530 000771 

%H5 
%% 

46M7 021532 016777 
%48 021540 017737 
%M9 Q215H6 000771 
%50 
4651 

%52 021550 016777 

4653 021556 017737 

4654 021 56H 000771 
4655 

4656 

%57 021566 016777 
4658 02157M 017737 
%59 021602 000771 
4660 
466^ 

4662 021604 017737 

4663 021612 000774 



RSil-R£C3-RS04 BASIC FUNCTION DlfiONOSTIC 
ITRAP - TRAP HANDLER 



FIO 
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15606f> 
1574X 



156050 
157364 



156032 
157350 



156014 
15733H 



155776 
157320 



157404 
177570 



157370 
177570 



157354 
177570 



157340 
177570 



15732H 
177570 



; ROUTINE fO ALLOW THE OPERATOR TO SET BITS 
: IN THE I/O REGISTERS VIA THE SUITCH REGISTER 

:«0R0 COUNT REGISTER 

§RSUC: NOV dUR.SRSUC ;N0V SUR INTO UORD COUNT REG 

NOV aRSUC.atOISPLAY ; DISPLAY IN LIGHTS 
9R SRSUC 

: CURRENT ADDRESS REGISTER 

SRSBA: KOV SUR.3RSBA ;t10V SUR INTO CURRENT ADDR REG 

tlOV SRSdA.aiDISPLAY ;SHOU IN LIGHTS 
BR SRS6A 

:DI5K ADDRESS REGISTER 

SRSDA: NOV SUR.9RSDA ;n0V SUR INTO DISK ADDR REG 

NOV aRSDA.SaOISPLAY ;SHOU IN LIGHTS 
BR SRSOA 

iORIVE STATUS REGISTER 

^S: NOV SUR.8RSDS ;nOV SUR INTO DRIVE STATUS 

NOV SRS6s,9tOISPLAY 5H0U IN LIGHTS 
BR SRSOS 



iORIVE ERROR REGISTER 
^SER: NOV SUR.SRSER 

NOV aRS£R,8tDISPLAY 

BR SRSER 



LOAD ER REG 

DISPLAY IT IN LIGHTS 

LOOP 



157314 177570 



iUATCH LOOK AHEAD REGISTER 

^LA: NOV SRSLA.aiDISPLAY ;SHCU IN LIGHTS 
BR SRSLA 



1flIN0£C-n-D£RSA-A 
OERSM.Pll 



Ht>S5 
%b6 
%S7 
%&8 
%&9 
%70 
%7l 
4672 
Hb73 
%7M 
Hb75 
%7t> 
•4677 
%78 
•4b7S 

%eo 

%8i 



Hfc84 
%85 

%87 



021bl4 
031b22 
021630 




oaibso 
oaibSb 
oaibbH 



02ibbb 

oaibTM 

02171b 
02172M 
021726 
021732 
021734 



0lb777 
017737 
000771 



01b777 
017737 
000771 



016777 
017737 
000771 



012737 
012777 
013777 
Olb777 
032777 
001760 
105777 
100375 
000754 



R5ii-RSC3-R£04 BASIC FUNCTION OlftGNOSTIC 
STRAP - TRAP HANDLER 



GIO 
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:RSC52 REGISTER 

155750 157254 §RCS2: nOV 5UR.3RSCS2 ;LOfiD CS2^,^^ „ 

157250 177570 MOV aRSt52,atDISPLAY ; DISPLAY IT 

BR SRCS2 



155732 
157256 



155714 
1572% 



0 00340 
177777 



15565H 
QOOOOl 

157152 



157262 
177570 



157252 
177570 



177776 
157206 
157202 
157166 
157160 



:RSAS REGISTER 

§RAS: nOV SUR.SRSAS ;LOAD RSA5, 

flov aRsfts.aioisPLAY display it 

BR 5RA5 
* RSMR register 

ftSfIRR: MOV SUR.aRSMR ;LOAD RSMR, 

nOV aRSftR,a»DISPLAY DISPLAY IT 

BR RSMRR 



lOISK CONTROL STATUS REGISTER 

WSCSl: MOV •34gj^PS 

MOV •177^,aRSMC 

BIT iBITO.aRSCSl 

BEQ SRSCSl 

0KBU5Y: TSTB aRSCSl 

BPL 0K6USY 

BR SRSCSl 



LOCK UP INTERRUPTS 
SET WORD COUNT -1 WORD 
SET UP CURRENT ADDRESS 
MOV SUR INTO CONTROL REG 
IS FUNCTION BITS SET 
FUNCTION BITS NOT SET 
TEST FOR DISK READY 
DISK STILL NOT READY 
DISK NOT BUSY SECT NEU CR 



4098 

sTOO 
4701 
4702 
4703 
4704 
4705 
470b 
4707 
4708 
470S 
4710 
4711 
4712 
4713 
4714 
4715 
4716 
4717 
4718 
4719 
4720 
4721 
47ffi 
47S 
472M 
4725 
472£> 
4727 
4728 
472S 
4730 
4731 
4732 
4733 
M73M 



J?Sil-RSC3-RS04 BASIC FUNCTION OWGNOSTIC 
STRAP - TRAP HANDLER 



HID 
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021738 
021742 
021744 
021770 
021772 
021776 
022036 
0220H0 
D22044 
022050 
022104 
022106 
022112 
022120 
022122 
022130 
022136 
02214M 
022152 
022160 
022166 
022170 
022176 

022212 
022214 
022222 
022230 
022232 



0222% 
0222S0 
0222S6 
022260 



012706 
0OC240 
104402 
104410 
012667 
1D4H02 
1041.10 
012667 
005167 
104H02 
104410 
012667 
016767 
104414 
052777 
016767 
042767 
016777 
016777 
032767 
001412 
012777 
0 12777 

100375 
00 0407 
012777 
012777 
000765 
017737 
005777 
100001 
104014 
026767 
001315 
000717 



000500 

021750 

157160 
022002 

157134 
157130 
022054 

002436 
155452 

000010 
155434 
170000 
157032 
157022 
010000 

024552 
000071 
156674 



024550 
000061 

156646 
156640 



THIS ROUTINE GIVES THE OPERATOR THE ABILITY TO 
SELECT DA, UC, UNIT • AND DESIRED PATTERN. PATTERN = NUMBER TYPED 
UITH SW12 SET THE PROGRAM HILL LOOP ON A READ UITK LOC OUTBUF+2 AS 
THE bTaODR. UITH BIT12 0 IN THE SUR THE PROCRAH 
WILL WRITE WITH OUTBUF AS THE BA AQDR. BAI IS ALWAYS SET 
SWITCHES 0 TO 11 WILL DETERIIINE THE DA 
EXAMPLE: " 



TYPE UNIT I 5 

TYPE POSITIVE (OCTAL) WC 64 
TYPE PATTERN DESIRED 1252525 



157064 

156756 
157044 
157036 
156742 
156730 
155402 

156714 
156700 



156670 
156654 

177570 



TKSEL: MOV 
NOP 
TYPE 
RDOCT 
MOV 
TYPE 
RDOCT 
MOV 
COM 
TYPE 
RDOCT 
MOV 
MOV 
CLRDK 
BIS 
MOV 
BIC 
MOV 
MOV 
BIT 
BEQ 
MOV 
MOV 
TSTB 
BPL 
BR 
MOV 
MOV 



TKl: 
TKa: 



TKS: 



UT: 



WTE: 



155314 156726 IS: 



SURCHQ: MOV 
TST 
BPL 
HLT 
CMP 
BNE 



;SET STACK 

;.ASCIZ <15><12>"TYPE UNIT • " 
:.ASCI2 <15><12>"TYPE POSITIVE (OCTAL) WC " 

;.ftSCIZ <15><12>-TYPE PATTERN DESIRED " 



SAVE SUR 
CLEAR AU RS REG 
SET Bfll 

GET SUR FOR DSK ADDR 
CLEAR UNIT I 
LOAD THE DA 
LOAD UORO COUNT 
REAO^ 
NO 

LOW CURRENT ADDRESS 
GO AND READ 
TEST FOR READY 



•500, SP 

(6)'f,UNNUM 
,.♦2 

(6)^,U0RK 
UORK 
,.♦2 

(6)+, OUTBUF 
SUR,&0RK2 

•BIT3.aRSCS2 

suR.u6n(i 

•176000^U0RK1 
UORKljASDA 
UORK.WSUC 
•BITi2,SUR 
UTE 

•0UTBUF4'2.aRSBA 
•71.aRSCSl 

aRs6si 

.-4 
SURCHG 

•OUTBUF.SRSBA 

i6i,aRs6si 

aRSCSl.StDISPLAY : DISPLAY CSl 

3RSCS1 ;ANY ERRORS' 

IS :N0 
'(M'UC 

SURiU0RK2 ;0ID SUR CHANGE' 

TKl YES 
TK2 NO 



OERSM.Pll tst:i2 



RSil-RSC3-RiQ4 BASIC FUNCTION DIAGNOSTIC 

WRITE LOCK Test 



no 
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4735 










4736 










4737 










4738 


022262 


104400 






4739 










4740 


022264 








4741 


022264 


1CN402 


022270 




4742 


022330 


000000 






•<7M3 


022332 


013767 


177570 


156616 


4744 
4745 


0223H0 
022342 


104414 
005067 


002202 




47% 


0223% 


012777 


024550 


156536 


4747 


022354 


012777 


007700 


156532 


4748 


022362 


012777 


177777 


156520 


4749 


022370 


012777 


000061 


156506 


4750 


022376 


105777 


156502 




47S1 


022402 


100375 






4752 


0224T4 


104402 


022410 




47S3 


022456 


000000 






•4754 


Q2?+60 


012777 


OOOOQO 


156426 


4755 


022466 


022777 


014600 


156422 


4756 


022474 


W1401 






4757 


022476 


104044 






4758 


022500 


012777 


000100 


156406 


4759 


022506 


022777 


010600 


156402 


47b0 


022514 


D01401 






*^7bl 


022516 


104044 






47b2 


022520 


104402 


022524 




47B3 


022560 


000000 






47b4 


022562 


022777 


014600 


156326 


47bS 


022570 


001401 








022572 


104044 






47b7 


022574 


012777 


000300 


156312 


47b8 


022602 


022777 


010600 


156306 


4769 


022610 


001401 






4770 


022612 


104044 






4771 


022614 


104402 


022620 




4772 


022654 


II I'll 






4773 


022656 


022777 


014600 


1S6232 


4774 


022664 


001401 






'*775 


022666 


104044 






4776 


022670 


012777 


000700 


156216 


4777 


022676 


022777 


010600 


156212 


4778 


022704 


001401 






4779 


022706 


104044 






4780 


022710 


104402 


022714 




47B1 


022750 


000000 







:«»«*««ttft«tt«ftft«ft«ft««ttt«««ft#ftftft«««»fftft«t«*ft«««««««ftftftf««f «««««#«««#««*«««« 

;TEST 112 URITE LOCK TEST 

tSTll2: SCOPE 



URTLCK: 



6S: 



IS: 



2S: 



3S: 



TYPE 

HALT 

MOV 

CLROK 

CLR 

MOV 

MOV 

MOV 

MOV 

TSTB 

BPL 

TYPE 

HALT 

MOV 

CMP 

BEQ 

HLT 

MOV 

CMP 

BEQ 

HLT 

TYPE 

HALT 

CMP 

BEQ 

HLT 

MOV 

CMP 

BEQ 

HLT 

TYPE 

HALT 

CMP 

BEQ 

HLT 

MOV 

CMP 

BEQ 

HLT 

TYPE 

HALT 



,.+2 

StSUR.UNNUM 
OUTBUF 

•OUTBUF.aRSBA 

•7700.aftSDA 

t-l.aftSMC 

M61.aRSCSl 

3R5CS1 

6S 

lO.aRSDA 

Mi460o,aRsos 

.+4 

!D5!0A 
•lOO.aRSOA 
tl0660,aR5DS 
.+4 

•OS! OA 
,.♦2 

•14600, aRSOS 

.+4 

!DS!0A 
iSOO.aRSDA 
•10650, 8RS0S 
.+4 

!DS!DA 
,.+2 

•14600, SRSOS 
.♦4 

!DS!0A 
»7Q0.aRSDA 
•10&60,aRSDS 
.+4 

!OS!DA 
,.♦2 



j.ASCIZ <15><12>"L0A0 SU WITH UNIT • AND CONT" 

;GET UNIT « 
; CLEAR ALL REG 

PUT A 0 INTO DATA BUFFER 

SETUP REG TO 
•TO A WRITE 

:UAIT FOR DONE 

;.ASCI2 <15><12>"SET WRITE LOCK ENABLE AND CONTINUE" 



;DS SH0UL0sl4600 



;0S SH0ULD:10600 

I.ASCIZ <1S><12>'*SET URT LOG SU 0 AND CONT" 



;DS SH0ULD=14600 



;DS 5H0ULD=10&00 
I.ASCIZ <1S><12>" 



SET WRT LX SU 1 AND CONT** 



:0S SK0ULD=m600 



;0S SH0ULD=10600' 

.j.ASCIZ <1S><12>"SET WRT LCK SU 2 AND CONT" 



fIfllNDEC-il-OFRSfl-A 
OERSfifl.Pil TST112 



RSii-R£03-RS04 BflSIC FUNCTION DIAGNOSTIC 
URITE LOCK TEST 



JIG 



^782 
H7Q3 
W78M 
H785 

S787 
W7P8 

■^790 

4792 
H793 
4794 
4795 
47% 
4797 
4798 
4799 
4800 
4801 
4802 
480J 
4804 
4805 
4806 
4807 
4808 
4809 
4810 
4811 
4812 
4813 
4814 
4815 
4816 
4817 
4818 
4819 
4820 
4621 
4822 
4823 
4824 
4825 
4826 
4827 



022752 

022760 

022762 

022764 

022772 

023000 

023002 

023004 

023044 

0230% 

023054 

023056 

02306C 

023066 

023074 

023076 

023100 

023140 

023142 

023150 

023152 

023154 

023162 

023170 

023172 

023174 

023234 

023236 

023244 




023326 
023332 
023334 
023340 
023342 
023350 
023352 



022777 

001401 

104044 

012777 

022777 

001401 

104044 

104402 

000000 

022777 

001401 

104044 

012777 

022777 

001401 

104044 

104402 

OO QMO 

022777 

001401 

104044 

012777 

022777 

001401 

104044 

104402 

00 0000 

022777 

001401 

104044 

012777 

022777 

001401 

104044 

012767 

012777 

012777 

012777 

012777 

105777 

1 00375 

105777 

_ 



014600 156136 4S: 



001700 156122 
010600 156116 



023010 

014600 156042 



003700 156026 
010600 156022 



023104 

014600 155746 



006000 155732 
010600 155726 



HALT: 



023200 
014600 



037700 
014600 



177777 
024550 
0 07700 
177777 
000061 
155552 

155544 



155652 



155636 
155632 



001252 
155606 
155602 
155570 
155556 



7$: 
5S: 



001401 
104044 



154600 155546 



CMP 

SEO 

HLT 

flOV 

CMP 

BEO 

HLT 

TYPE 

HALT 

CMP 

BEO 

HLT 

MOV 

CMP 

BEO 

HLT 

TYPE 

HALT 

CMP 

BEQ 

HLT 

MOV 

CMP 

BEQ 

HLT 

TYPE 

HALT 

CMP 

BEQ 

HLT 

MOV 

CMP 

BEQ 

HLT 

MOV 

MOV 

MOV 

MOV 

MOV 

TSTB 

BPL 

TSTB 

BPL 

CMP 

BEO 

HLT 



114600, aPSDS 
.♦4 

!DS!0A 
•1700.SRSDA 
«10&0£l,aRS0S 
.+4 

•OS! OA 
».+2 

«I46Q0,3RSDS 
.+4 

!DS!0A 
I3700.3RS0A 
110600, SRSOS 
.♦4 

!OS!OA 
,.♦2 

•14600. aRSDS 
.+4 

!DS!0A 
l6000.aRS0A 

iio6o£i,aRsos 

.+4 

IDS! OA 
..♦2 

ll4600,aRS0S 
.♦4 

!DS!DA 
l7700.aRSOA 
•14606, aRSDS 
.+4 

!0S!0A 
•-l.OUTBUr 
SOUtBUF.aRSBA 
•770gjAS0A 

•-i,aRsuc 

•6i!aRscsi 

aRsdsi 

7S 

aRscsi 

•154600, aRSOS 
.+4 

!OS!OA 
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;DS SHOULD: 14600 



;0S SH0ULDS10600 

j.ASCIZ <15><12>''SET URT LCK SU 3 Af€ CONT" 



;0S SH0ULDS14600 



;DS SH0ULDS10600 

;.ASCIZ <15><12>''SET i4RT LCK SU 4 AND CONT* 



;DS SH0UL0sl4600 



;DS SH0UL0=10600 

•.ASCI2 <15><12>-SET URT LCK SW 5 AND CONT" 



;DS SH0UL0sl4600 



;0S SH0UL0=14600 

; PUT A 1 INTO DATA BUFFER 

; SETUP REG TO 

•TO A URITE 

;TRY TO WRITE 
•UAIT FOR DONE 

;UAIT FOR READY 



;DS SH0ULD=15%00 



KIO 



rwi 

DEr 



C-ll-DERSA-fl 
.Pll TST112 



RSU-RS03-RSQ4 BASIC FUNCTION OlftCNOSTIC 

"TTF - — 




M828 
4829 

41 
4i 
4 

4833 
483M 
4935 
4B3& 
4337 
^B3B 
S939 
49HQ 
484 1 
4842 
i8S3 
4844 

4846 
4847 
4848 
48»9 
4850 
4951 
4852 
4853 



0233SM 
023362 



023376 

023H06 
0234i4 
023422 
023M30 

02343b 
023442 
023H44 
023450 
023452 
023454 
023512 
023514 
023522 
02352M 

023526 
023534 
823542 



022777 
001401 
ICNOHM 

27 
001401 
IQHOMO 
005067 
012777 
012777 
012777 
012777 
105777 
100375 
005767 
001401 
104040 
104402 
000000 
022777 
OC-'^Ql 
iOS '0 



WRITE LOCK TEST 
C04000 155536 



014600 .55520 



001142 
024s:^n 
007700 
177777 
000071 
155HM2 

001100 



023460 
010600 



012777 000040 
016777 155416 
000002 



155476 
155472 
155460 
155446 



155374 



155352 
155344 



CMP 

BEG 

HLT 

CLRDK 

CMP 

6EQ 

HLT 

CLR 

MOV 

MOV 

MOV 

MOV 

BS: TSTB 
BPL 
T5T 
BEQ 
HLT 
TYPE 
HALT 
CMP 
BEQ 
HLT 

; CLEAR RLL DISK 
.CLRDK: MOV 

MOV 

RTI 



14000, 3RSER 
.+4 

!D5!0R 

«14600,3RS0S 

.♦4 

!D5 

OUTBUF 

•OUTBUF.aRSBR 
•7700.aftS0fl 
»-l,aR5UC 
«71.aRSCSl 

aRs6si 

BS 

OUTBUF 
.+4 
IDS 
,.+2 

tl0600,aRS0S 

.♦4 

!DS 

REGISTERS 

•40,aRSCS2 

UNNUM.aRSCS2 



MRCYU 27(732) Qb-OCT-Zb 08:51 PAGE 128 



DID ULE CLEARS 
NO 

R CLERR SHOULD NOT CLEAR ULE 
PUT R 0 INTO DRTR BUFFER 
SETUP REG TO 
TO A WRITE 

DO A READ TO SEE IF DISK DID 
ACTUALLY GET iSlTTEN ON TO 
WAIT FOR DONE 

IS DATA STILL 0 ON THE DSK' 
YES 

NO DSK DID GET WRITTEN ONTO WITH WLE SET 
.ASCIZ <15><12>'*RESET ALL W/L SWITCHES- 
DID ULE CLEAR 
YES 
NO 

CLEAR PLL DSK REG 
GET UNIT NUMBER 



rtfiirCEC-il-DERSfl-fl RSil-RS03-R£04 SflSIC FUNCTION DIftGNCSTIC 
DERSAA.PIl TSTI12 URITE LOCK TEST 



M95M 

M85i> 
48S7 
4858 
4859 
48&0 

MSbi 

4863 

4864 

4865 

4866 

4867 

4868 

4869 

4870 

4871 

4872 

4873 

4874 

4875 

4876 

4877 

4878 

4879 

4880 

4881 

4882 

4883 

4884 

4885 

4886 

4887 

4888 

4889 

4890 

4891 

4892 

4893 

4894 

4895 

4896 

4897 

4898 



; ERROR TYPTXTOUT ROUTINE 



023 
023 



023544 
023550 
023552 
73564 
!3566 
. >3570 
0^3604 
023606 
023610 
023614 
023614 
023626 

K3634 
0236% 
023652 
023654 
023654 
023666 
023672 
023674 
023702 
023704 
023712 
023714 
023726 
023732 
023734 
023742 
023744 
023756 
023762 
023764 
023772 
023774 
024006 
024012 
024014 
024022 
024024 
024036 
024042 



005767 
001021 
104402 
010046 
104404 
104402 
010146 
104404 
000167 

104402 
017746 
104404 

104402 
0177% 
104404 

104402 
0177% 
104404 
032767 
001076 
032767 
001410 
104402 
017746 
104404 
032767 
001410 
104402 
0177% 
104404 
022767 
001410 
104402 
017746 
104404 
032767 
001410 
104402 
017746 
104404 



175054 
023556 

023574 

000432 

023620 
155252 



023640 
155246 



023660 
155214 

000200 

000100 

023720 
155170 



RSREC: TST 
BNE 
TYPE 
MOV 
TYPED 
TYPE 
MOV 
TYPED 
JMP 



8S: 



IS: 



2S: 



174722 
174712 



000020 174662 3S: 

023750 
155130 

000004 174632 4S: 

024000 
155102 

000010 174602 5S: 

024030 
155046 



TYPE 

MOV 

TYPED 

TYPE 

MOV 

TYPEO 

TYPE 

MOV 

TYPEO 

BIT 

BNE 

BIT 

BEQ 

TYPE 

MOV 

TYPEO 

BIT 

BEQ 

TYPE 

MOV 

TYPEO 

BIT 

BEQ 

TYPE 

MOV 

TYPEO 

BIT 

BEQ 

TYPE 

MOV 

TYPEO 



.HLTCT 
8S 

6aO,-(6) 
..+2 

&00D,-(6) 
PTDONE 

iRScsi,-(e») 

iRSER,-(6) 
..+2 

iRSCS2,-(6) 

i200,. HLTCT 
SEEC 

•flS,. HLTCT 
3$ 

«IRSflS.-(6) 

iBfl,. HLTCT 
4J 

dRSBA,-(6) 

iDfl,. HLTCT 
5J 

alRSDA,-(6) 

«UC,. HLTCT 
6S 

olR5UC,*(&) 
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SHOULD UF TYPTXT GOOD fiND BAD 
NO 

.flSCIZ " BftDs" 
PUT BPD ON STACK 
TYPE STACK IN OCTAL 
.ASCI2 GOODS" 
PUT GOOD ON STACK 
TYPE STACK IN OCTAL 
GET OUT 

• ASCIZ " CSls" 

I PUT aRSCSl ON STACK 
•TYPE STACK IN OCTAL 

• ASCIZ " ERs" 
•PUT SRSER ON STACK 
•TYPE STACK IN OCTAL 

ASCIZ " CS2=** 
PUT aRSCS2 ON STACK 
TYPE STACK IN OCTAL 
TYPTXT SECOND SET ' 
YES 

TYPTXT ER ' 
NO 

.ASCIZ " AS=" 
PUT 3RSAS ON STACK 
TYPE STACK IN OCTAL 
TYPTXT BUS ASSRE3S 
NO 

.ASCIZ " BA=- 

PUT SR56A ON STACK 

TYPE STACK IN OCTAL 

TYPTXT OA ? 

NO 

-ASCIZ - DA=" 

PUT 9RSDA ON STACK 

TYPE STACK IN OCTAL 

TYPTXT WC' 

NO 

ASCIZ ** UCs** 
PUT aRSUC ON STACK 
TYPE STACK IN OCTAL 



DERSRfl.Pli TS1 



4899 

H900 
4901 

318! 

M904 

M905 

H906 

4907 

4909 

4909 

4910 

4911 

4912 

4913 

4914 

4915 

4916 

4917 

4918 

4919 

4920 

4921 

4922 

4923 

4924 

4925 

492b 

4927 

4928 

4929 

4930 

4931 

H932 

4933 

4934 

4935 

493b 

4937 



024044 
024052 
024054 
Q240b& 

0240' 4 
024JOO 
024106 
024114 
024116 
024130 
024134 
024136 
024144 
024146 
024160 
024164 
02MI66 
024174 
024176 
024210 
024214 
024216 
024224 
024226 
024240 
024244 
024246 
024254 

024256 
02M2b2 
024266 
024270 
024274 
024300 
024302 
024304 
024310 



032767 

001475 

104402 

017746 

104404 

000167 

042767 

032767 

001410 

104402 

017746 

104404 

032767 

001410 

104402 

017746 

104404 

032767 

001410 

104402 

017746 

104404 

032767 

001410 

104402 

017746 

104404 

052767 

000207 

005067 
105777 
100406 
005267 
005767 
001403 
000767 
062716 
000207 



RS11-RS03-RS04 BPSIC FUNCTION 


WRITE LOCK TEST 






000040 


174552 


6S: 


BIT 








BEO 


024060 






TYPE 


155024 






J10V 








TYPED 


000146 






jup 


000200 


174516 


SEEC: 


BIC 


OuOSHO 


174510 




BIT 








BEQ 


024122 






TYPE 


154776 






MOV 








TYPED 


000210 


174460 


9S: 


BIT 








BEQ 


024152 






TYPE 


154742 






MOV 








TYPED 


000220 


174430 


lOS: 


BIT 








BEQ 


024202 






TYPE 


154714 






MOV 








TYPED 


000204 


174400 


IIS: 


BIT 








BEQ 


024232 






TYPE 


154660 






MOV 








TYPED 


100000 


154710 


PTDONE: 


BIS 








RTS 



154716 
154616 

154704 
154700 



000002 



UfllTRY: CLR 
1$: TSTB 
BMI 
INC 
TST 
BEQ 
BR 

2S: ROD 
3$: RTS 



•DS..HLTCT 

ptd6ne 

•)RS0S,-(6) 

PTDONE 
•200,.HLTCT 

•ot,!hltct 

9J 

SRSDT,-(6) 

•DB,.HLTCT 
IDS 

iRSDB,-(6) 

«MR,.HLTCT 
11$ 

•IR5MR,-(6) 
«Lfl..HLTCT 

ptd6ne 

alRSLR,-(6) 

•BIT15,DNCEE 
PC 

UORK 

aRSCSl 

2S 

UORK 
UORK 
3S 
IS 

M2,(SP) 
PC 



MflCYU 27(732) 06-DCT-7b 08:51 PftGE 



DRIVE STATUS 
NO 

.fiSCIZ " DS=" 
PUT aRSCS ON STACK 
TYPE STACK IN OCTAL 
GET OUT 

CLEAR COMMON BIT 
TYPTXT DRIVE TYPE' 
NO 

• ASCIZ DT=" 
PUT aRSDT ON STACK 
TYPE STACK IN OCTAL 
TYPTXT DATA BUFFER 
NO 

.ASCIZ " DB=" 

PUT JRSDB ON ST^CK 

TYPE STACK IN OCTAL 

TYPTXT MN' 

NO 

.ASCIZ " MR=" 

PUT aRSMR ON STACK 

TYPE STACK IN OCTAL 

TYPTXT LA? 

NO 

ASCIZ " LA=" 
PUT 3RSLA ON STACK 
TYPE STACK IN OCTAL 
SET FDRNO ERROR FLAG 



CLEAR COUNTER 
TEST READY 
DK CDNT 
UPDATE COUNTER 
DONE YET? 

READY DID NOT COME UP 
CONTINUE UAITINQ 
UPDATE RETURN PC 
RETURN 



KAIN0EC*11-0ERSA-A 
OERSm.Pll TSTlia 



RSll-R£03-fi£Q4 BASIC FUNCTION DIAGNOSTIC 
WRI.E LOCK TEST 



NIO 
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4940 
4941 

4?15 
4944 
4945 
4946 
4947 
4948 
4949 
4950 
H' 
4 

4953 
4954 
4955 
4956 
4957 
4958 
4959 
4960 
4%1 
4962 
4963 
4964 
4965 
4966 
4967 
4968 
4969 
4970 
4971 
4972 
4973 
4974 
4975 
4976 



;RAND0I1 OHTfl GENERATOR SUBROUTINE 



Q2S312 016767 000136 

024320 016767 000132 

m 888iig 

02H336 012703 000007 
♦2 



000072 
000066 
001057 

047401 

000006 
000002 

000026 

154544 

000014 

154530 



024352 
354 
356 
362 
024364 
0?4370 
^372 
024376 
024400 
024402 
024406 
024410 
124414 
024420 
024422 
024426 
024430 
024434 
024436 
024442 
Oc4444 
024450 
024452 
024454 
024456 
024460 
024462 
024464 



006104 
006102 
005303 
001373 
066700 
005504 
066704 
005502 
062700 
005504 
005502 
062704 
005502 
062702 
062700 
005504 
010067 
010021 
005367 
001406 
010467 
010421 
005367 
001326 
000205 
000000 
000000 
000000 
000000 



OOOmC RANDOM: MOV 

000134 nov 

RANDl: nov 
MOV 
MOV 
CLR 

SHIFT; ASL 
ROL 
ROL 
DEC 
BNE 
ADO 
ADC 
ADD 
ADC 
ADD 
ADC 
ADC 
ADD 
ADC 
ADD 
ADD 
AOC 
MOV 
MOV 
DEC 
BEQ 
MOV 
MOV 
DEC 
BNE 

EXiEN: RTS 
LONUM: 0 
HINUM: 0 
L05AV: 0 
HISAV: 0 
RANEND: 



LONUM, LOSAV 
HINUM, HISAV 
LONUM, RO 
HINUM, R4 

«7,R3 

R2 

RQ 

R4 

R2 

R3 

SHIFT 
LONUM, RO 
R4 

HINUM, R4 
R2 

il057,RQ 

R4 

R2 

•47401, R4 

R2 

16, R2 
12, RO 
R4 

RO, LONUM 

R0-(R1)+ 

UORK 

EXGEN 

R4, HINUM 

R4;(l)+ 

UOftK 

RANDl 

R5 



SET UP RQ WITH 5 DIGITS LOU 
SET UP Rl WITH 5 DIGITS HIW 
SET UP SHIFT COUNT 
CLEAR R2 

SHIFT RO LEFT AND 

ROTATE CARRY INTO LSB OF Rl INTO 

ROTATE CARRY OUT OF Rl INTO R2 

DECREMENT R3 

CONTINUE SHIFT LOOP 

ADDN IN NUMBER TO MAKE X 129 

PROROGATE CARRY 

ADDN IN NUMBER TO MAKE X 129 

PROROGATE CARRY 

ADDN LOW CONSTANT 

PROPOGATE CARRIES 

PROPOGATE AGAIN 

ADDN HIGH CONSTANT 

PROPOGATE CARRY 

ADDN HIGHEST CONSTANT 

REPRIME RO WITH HIGH DIGIT 

PROPOGATE CARRY 

PUT RO BACK IN LONUM 

LOAD UC 



;PUT Rl BACK IN HINUM 
•HOLD HINUM FOR PROGRAM 

; RETURN TO PROGRAM 



-f995 

^"597 

'♦we 

5D00 
SOOl 
S0C2 
£003 
5004 
5005 
5006 
5007 
5008 
50QS 



08HS7M 

Ji?H500 
02H508 
02H50S 
Q2->50b 

ae-^sio 

Q2H512 

q?s5i4 

024522 
02452S 



ocooci 
oococ*^ 

C000I7 
000023 
000Q2S 




Q24SH2 
324544 
0245% 
024550 
02S3SC 



000000 
Q003X 
000000 
000031 



^*.-SS:2-RS04 Basic function OlftiNOSTIC 

nri ^:CK TEST 



Bll 
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:'fiBL£S FOR iLLEiftL FUNCTIC^ TESTS 

ILLTA8: 3 
5 
7 
13 
15 
17 
23 
25 
27 
33 
35 
37 
41 
43 
45 
47 
0 

ILFTB2: 53 
55 
57 
63 
65 
73 

?P 

0 

OUTBUF: .BLKU 300 
INBUF: .BLKU 300 
.END 



= OOCIX 

ATA = ICOOOQ 
A091 00117L 
3A = 000020 

OK) s-4}00C03 



! 



KSil-«?5C3-RSC4 BASIC FUNCTION DIfiiNC5'IC 
"EFEfiENCE TftB^E — U5EP 5>1B0.5 



Cll 
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3AI : 

BAITST 

BEGIN 



BI _ 

BITCS2 
i BITST 
' BITUC 

'ilTl = 
BITIO = 
8IT11 s 

I BITll = 
BIT13 r 

I BIT15 = 
BIT2 = 
BIT3 s 
BITM s 
BITS = 

BITS = 
BIT9 = 
BLOCK 
flPORTT 
CHCKOV 



000010 
OObSMH 

goigob 

000007 
004322 
00420b 




oioggo 

020000 




000100 
000200 
000400 

goigoo 

007004 
001174 
X1622 
1C4414 



CSTST 010722 
CSl : 000001 



3168 

3bl0 
IS20I 
18341 
1797t 

2539 

i72gt 

2401* 

2t>fe7» 

27&6 

2S17 

29% 

3149* 

3303 

3640* 

3flb4 

4267* 

I823t 

27e0t 

1674 

1703f 

23841 

23b0t 

2347t 

2372t 

I712t 

17l3t 

17221 

1673 

17241 

172St 

1665 

17271 

17141 

17151 

17161 

17171 

17181 

17191 

17201 

17211 

28341 

18371 

1916 

2061 

2780 

3221 

3493 

382S 

418b 

31631 

17931 

2582 

28b3 

3020 



31771 

2003 
3650 



1973 

2605 

20%t 

2402 

2668 

2738» 

2926* 

3007* 

3150« 

3309t 

3642 

3896« 

4268 

2783 



2721» 

19201 

2347 

2795 

3260 

3559 

3848 

4209 

1968 
2609 
2885 
3035 



2444 
3735 



2031 

2885 

2I35« 

2408« 

2671# 

2739 

2929 

3010 

3151 

3310 

3730» 

3899* 

U271* 

27% 



2H54 
3742 



2037 

2940 

2136 

2409 

2674 

2814« 

2934* 

3022* 

3186* 

3347* 

3733 

3900 

4274 

2805 



3167 3171 



2393 
2804 
330b 
3579 
3873 
%321 

2026 
2611 
2922 
3038 



2395 
2834 
3320 
3597 
3882 
4712 

2066 
2617 
2925 
3299 



2476 
3779 



2119 

3001 

2173* 

2413* 

26^7* 

2815 

2935 

3025 

3187* 

3348 

3759* 

3995* 

4859 

3826 



1692 


18541 


4339 




4334 


4436 






1920 


1938 


2332 


2606 


1691 


17231 


1865 




3660 


3663 


4718 




1884 


1904 


1924 


3316 




3267 


3292 


Ig^l 


1906 


1913 


4256 


4225 


4231 


4286 


4713 


3789 


3830 


3855 


3890 



2422 
2904 
3329 
3614 
3909 
4744 

2070 
2653 
2940 
3315 



2507 
3800 



2123 

3017 

2174 

2414 

2679 

2822* 

2%2* 

3060* 

3189* 

3359* 

3762 

3996 



3319 
4926 



2450 
2947 
3371 
3626 
3921 
4831 

2074 
2655 
2943 
3338 



2523 
3806 



2127 

3035 

2210* 

2562* 

2702* 

2825 

2%7 

3062 

3194 

3360 

3791* 

4059* 



3849 3883 



2542 
4261 



2149 

3776 

221! 

2563* 

2703 

2874* 

2%9 

3067* 

3230* 

3538* 

3794 

4097* 

3%0 



2565 
4281 



2388 

3839 

2306* 

2566 

2715* 

2906* 

2970* 

3068 

3233 

3541 

3801* 

4140* 



£379 
43C3 



2392 

4884 

2320* 

2626* 

2716 

2910 

2971 

3086* 

3284* 

3545* 

3804 

4162* 



2656 2709 2911 2970 4684 



3323 



2485 
2960 
3395 
3669 
3940 



2082 
2661 
2946 
3341 



2516 
3039 
3408 
3688 
3953 



2352 
2697 
2981 
3353 



2556 
3053 
3426 
3700 
4005 



2356 
2699 
2984 
3382 



2595 
3074 
3433 
3719 
4062 



2429 
2746 
2987 
3416 



2937 
4307 



3108 
4310 



2441 2473 



2335* 

2627 

2761* 

2911* 

2975* 

3087 

3287 

3546 

3814* 

4255* 



2365* 

2630* 

2762 

2912 

2976 

3092* 

3290* 

3555* 

3817 

4256* 



2646 
3116 
3451 
3728 
4111 



2461 
2749 
3001 
3441 



2690 
3121 
3457 
3788 
4136 



2492 
2786 
3004 
3472 



32^4 
•^370 



25C4 

2366 

2633 

2765* 

2916* 

2993* 

3093 

33C2# 

3556 

3861* 

4258 



2730 
3165 
3482 
3810 
4158 



2527 
2820 
3017 
3523 



•WlNOEC-ll-CCRSii-H R5iI-R£C3-R£0H BASIC FUNCTION OlflufiJiTIC 

DERSflrt.P:i :«?:ss reference table ~ user symbols 



Dll 
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:S2 



OftOTST 

38 : 
DCK : 
DCKTST 
C2SPLA= 
>AOR 
OKBUSY 
Dlt = 
OONCS 

Dorc 

DO^E 
OCMINT 
DRCLR 
DRY = 
DS = 



CCC2X 
00X04 



oologp 

013736 
014074 
D00210 
100000 
018644 
1V570 
013276 
021726 
100000 
011110 
020036 
001770 
017062 
0OS336 
000200 
000040 



DT = 000240 

cvTtjn 0013S0 

0VTR6 020120 

ER = 000002 



ERINT 

ERR s 

ERRIffT 

ERftOBS 

ERRR 

ERTST 

EXGCN 

EXTRP 

EXTTW 

EXTTST 

EXTTl 

EXTl 

FILCW 

FINTST 

FLOTBfl 

FLOTOP 

FlCTWC 

FJ^OO 



017064 
040000 
017154 
001002 
01069* 
014220 
024452 
016514 
Oil 
Oli 

Si6524 
001014 
017170 
003024 
003324 
003164 
015J02 



3585 
1 8001 
17951 



4788 

18211 

366SI 

37001 

18021 

18221 

34931 

17021 

35791 

46861 

18151 

3181 

1932 

1921 

4172 

25561 

18161 

17981 

2758 

2981 

3365 

3610 

3872 

4284 

4802 

18041 

1878 

4215 

17941 

2617 

3124 

3562 

"901111 

Stso 

41831 

18191 

4185 

17341 

3148 

37281 

4966 

4013 



40621 

4101 

17381 

4194 

21321 

22071 

2l70t 

38481 



3613 
1960 
1979 

Hi 

4793 



4911 



41951 
4437* 
31541 

49711 

4089 

41021 



41031 

4364 

41991 



3678 
2022 
2194 
2708 
4034 
4797 



J687 


3709 


3718 


3753 


5930 


3939 


4120 


4126 


4145 




2092 


2102 


2106 


2111 


2406 


2827 


3362 


3647 


3fe5H 




2198 


2202 


2223 


2438 


2470 


2501 


2536 


2571 


2614 


2617 


2711 


2749 


2752 


2758 


294b 


2987 


m 






3773 


4281 


4284 


4731 


4757 


4761 


4766 


478*4 


4802 


4806 


4811 


4815 


4827 


4830 


4899 









4415* 


4419* 


4638* 


4643* 


4648* 


4653* 


4658* 


4662* 


4666* 


4671* 


4676* 


4728* 


4687 
























32011 
























43281 
























19321 
























41761 
























2846 
1%4 


2856 
2464 


2510 


2530 


2548 


2617 


2623 


2638 


2658 


2661 


2708 


2749 


2794 


2811 


2848 


2852 


2860 


2863 


2882 


2890 


2922 


2925 


2950 


2953 


2984 


3042 


3045 


3077 


3102 


3105 


3120 


3127 


3199 


3238 


3299 


3356 


3391 


3394 


3401 


3422 


3425 


3447 


3450 


3478 


3481 


3485 


3534 


3537 


3639 


3658 


3684 


3691 


3715 


3722 


3738 


3767 


3800 


3809 


3836 


3869 


3876 


3905 


3908 


3912 


3915 


3936 


39S3 


4034 


4171 


4193 


4197 


4261 


4307 


4310 


4757 


4761 


4766 


4770 


4775 


4779 


4784 


4788 


4793 


4797 


4806 


4811 


4815 


4827 


4830 


4834 


4844 


4849 


4899 








4906 
























18811 
























4242 
1985 


43431 

2043 


2231 


2235 


2242 


2248 


2255 


2432 


2479 


2495 


2545 


2574 


2658 


2661 


2708 


2749 


2798 


2922 


2925 


2981 


2984 


3073 


3096 


3120 


3199 


3299 


3385 


3391 


3398 


3419 


3422 


3444 


3447 


3475 


3478 


3531 


3607 


3617 


%81 


3694 


3712 


3746 


3758 


3782 


3813 


3860 


3895 


3933 


4034 


4038 


4050 


4054 


4073 


4076 


4088 


4092 


4171 


4193 


4197 


4284 



4457 



4095 41001 



4365 
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;ooo s'.occooi 



HflLT 

HiNUn 

HISAV 



Oc304M 
024456 
024H62 
lOHOOO 



HLTflOR 

IRCRR 

ICNT 

IE • 

ILFDN 

iLFDfC 

ILFTB2 

ILf&7 

ILLFUN 

iLLTfle 

ILL51 

I»«UF 



001012 
0133S2 
OOlOQQ 
000100 
007560 
OIO2E 
02452b 
010222 
007560 
024464 
007304 
025350 




3061« 
3166« 

M31» 
41 

4163* 

47901 

4941 

4941* 

16981 

2037 

im 

5435 

2495 

2545 

2614 

2676 

2758 

2852 

2937 

3012 

3095 

3235 

3356 

3425 

3537 

3647 

3718 

3779 

3869 

3943 

4126 

4281 

4788 

1737t 

35971 

17331 

18241 

2907 

2%4 

2%1 

30531 

2%0l 

2905 

29021 

50081 



2097* 
2307* 
2564ft 
26731 
2766* 
2865* 
2971* 



3169* 



3733 

3862ft 

4257ft 

4943 
49751 
1960 
2043 



143 

g!!« 
2548 
2617 
2681 
2764 
2860 
2940 
3017 
3098 
3238 



11 
3543 
3650 
3722 
3782 
3872 
3W 
4145 
4284 
4793 
4441* 



2132ft 

2321ft 

2S65ft 

2674 

27b7ft 

2867* 

2974ft 

3065ft 

3192ft 

3303 

35% 

3760* 

3863ft 

4258 



2943 
3020 
3102 
3289 
3365 
3444 
3548 
3654 
3735 
37% 
3876 
4034 
4150 
4303 
4797 
4442f 



^134 

2336* 

2566 

2678ft 

2768 

2872 

2976 

3066* 

3193* 

3307* 

3549* 

3761* 

3864 

4265* 



1968 
2053 



2368 
2444 
2504 
2571 
2623 
2699 
27% 
2875 
2946 
3027 
3105 
3295 
3382 
3447 
3558 
3658 
3738 
3800 
3895 
4038 
4170 
4307 
4802 
4443 



2136 




2170* 


2172 


2174 


2177* 


2207* 


2209 


2211 




two • ■ 


twOO 


2399* 


24i3Q» 

W 'WW " 


2402 

• Wb 


2407* 


2409 


241c* 


toe 


262*^* 
tot 


2627 

tot' 


t Ow 1 " 


2632* 


2633 

k www 


2665* 

ft www 


wwww 

2759* 


2668 




t f 


270 1* 


2703 


2716* 

t > Aw" 


2717* 


2718 


5760* 


2787* 


2789 

t ■ 07 


2812* 

to* t " 


2813* 


281*^ 


2823* 

W WW W " 


2B2H* 


2825 


2853* 


CO' Q 


t t 


2915* 


'917 


2927* 




2929 


2932* 


2933* 




2995* 


2996 


3008* 


3009* 


3010 


3023* 


3C24* 


302S 


3068 


3084* 


3087 


3090* 


3091* 


3093 


3145* 


31%* 


3151 


3194 


3231* 


3232* 


3233 


3285* 


3286* 


3287 


3291* 


3294* 


3308* 


3310 


3345* 


3346* 


3348 


3358* 


3360 


3539* 


3540* 


3552* 


3554* 


3556 


3628* 


3631* 


3635 


3641* 


3642 


3731* 




3792* 


3793* 


3794 


3802* 


3803* 


3804 


3815* 


3816* 


^bI?* 


3898* 


3900 


3993* 


3994* 


3996 


4058* 


40%* 


4149* 


4266* 


4268 


4272* 


4273ft 


4274 


4862 









4953 4967* 49731 



1973 
2066 

^ 

2376 
2454 
2507 
2574 
2629 
2705 
2791 
2879 
2950 
3035 
3108 
3299 



3562 
3678 
3742 
3806 
3902 
4050 
4171 
4310 
4806 
4444 



1965 


1991 


1997 


2003 


2022 


2074 


2082 


2092 


2098 


2102 


2161 




2176 
2272 


2186 
2280 


2194 
2288 


2368 
2464 


2392 
2467 


2406 
2«70 


2411 
2473 


2416 
2476 


2520 


2527 


2530 


2533 


2536 


2582 


2585 


2588 


2602 


2605 


2638 


2653 


2655 


2658 


2661 


2711 


2714 


2720 


27% 


2749 








2820 


2827 








2919 


2922 


2978 


2981 


2984 


2987 


2998 


3042 


30% 


3064 


3070 


3073 


3124 


3127 


3139 


3156 


3173 


3312 


3315 


3338 


3341 


3344 


3391 


3394 


3398 


3401 


3416 


3475 


3478 


3481 


3465 


3523 


3588 


3607 


3610 


3613 


3617 


3664 


3687 


3691 


3694 


3709 


3753 


37S8 


3764 


3767 


3770 


3813 


3819 


3836 


3839 


3842 


3908 


3912 


3915 


3930 


3933 


4060 


4073 


4076 


4088 


4092 


4193 


4197 


4260 


4261 


4264 


4757 


4761 


4766 


4770 


4775 


4815 


4827 


4830 


4834 


4844 



2026 
2106 
2198 
2308 



3001 
a}77 
3196 
3350 
3419 
3531 
3639 
3712 
3773 
3860 
3936 
4098 
4270 
4779 
4849 



2031 
2111 
2202 
2322 
2432 
2492 
2542 
2611 
2670 
2755 
2848 
2931 
3004 
3089 
3199 
3353 
3422 
3534 
3644 
3715 
3776 
3866 
3939 
4120 
4276 
4784 



1861ft 4324* 4393 4408 4410 4412* 4413* 4415 4418» 4419 4425 4453* 

29551 
30471 
49981 



49801 
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INCW 

INPUT 

INTOON 

INTRS 

I MRS 

iNTilS 

INTilH 

IR = 

KIPARO= 

kIPflRU 

KIPf«7= 

k:«>dro= 

K1P0R1= 

KIPO«H= 

KlP'jR?- 

Lf* - 

LPO 

LftSTSC 

LfiTDON 

LflTST 

LBT = 

LONUM 

LOPi 

LOPS 

L0P3 

LOSAV 

fCflOUT 

flOOOON 

nooNuri 

MPRO = 

m - 

fULTII 
N = 



01X36 
021420 
016744 
0167% 
016&42 
016736 
0170S0 
000100 
172340 
172342 
172344 
172356 
172300 
172302 
172304 
172316 
000204 
001010 
015350 
010720 
010576 
002000 
024454 
003744 
0C4014 
004064 
024460 
01^ 

017172 
172100 
000220 
001320 
000113 



NED : 
fCOTST 

rtco 

NNOOP 

NN0P21 

NOOP 

N0QP21 

♦iOPflft 

NOUGO 



010000 
013644 
013466 
013726 
004626 
005144 
004502 
005006 
011320 
001774 
006316 



35211 

4558 

4146 

41571 

41341 

4137 

415*3 

leioi 

17721 

17731 

I774i 

]775l 

17761 

17771 

I778i 

17791 

18011 

17361 

3S211 

3153 

31371 

18181 

4940 

2298 

2312 

2326 

4940* 

41041 

43211 

42091 

18741 

16971 

2113 

21881 

2256 

23591 

2511 

27791 

314Q 

34071 

3664 

38811 

4178 

18131 

3633 

36261 

3659 

24501 

25161 

24221 

24851 

3239 

1914 

27211 



4591 
41511 



41491 
41731 

4015* 

4016* 

40l7t 

4014* 

4018t 

4019t 

4020* 

4021* 

3139 

1862« 

31571 



4942 

22991 

23131 

23271 

49741 



4592 46121 



4063* 



3156 
2298« 



4921 

2312* 2326* 



4951 4963* 49721 



3210 




2265 


2272 


1991 


2048 


1869 


18731 


1941 


19451 


21141 


2129 


21301 


2141 


2203 


22041 


2217 


22181 


22571 


2266 






2370 


mi9 






25151 


2549 


25531 


2590* 


2799 


28031 


2829 


28331 


31411 


3158 


31621 


3202 


3428 


34321 


3452 


34561 


36681 


3695 


36991 


3723 


3916 


39201 


3948 


39521 


41821 


4200 


42041 


4735 


3652 


3656 






36601 








3661 


36631 






3245 


32491 






1931 


19371 
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4414* 


4420 


4422 


4425 


2280 


2288 


2579 


2843 


2004 


20081 


2054 


20581 


21421 


2150 


21511 


2166 


2224 


22251 


2237 


22381 




2281 


22821 


2289 


I394I 


23951 


2417 


24211 






26451 


2682 




^961 


3048 


30521 


32061 


3251 


32551 


3324 


3486 


34901 


3574 


35781 


37271 


3783 


37871 


3820 


4000 


40041 


4106 


41101 


47391 
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3173 


3199 


4916 




2075 


20761 


2084 


20881 


21671 


2180 


21811 


2187 


2243 


22441 


2249 


22501 


22931 


2342 


23%1 


2358 


2445 


24491 


2480 


24841 


26861 


2725 


27291 


2775 


3110 


31141 


3132 


31361 


33281 


3366 


33701 


3403 


3590 


35941 


3621 


36251 


38241 


3844 


38481 


3877 


4129 


41331 


4152 


41561 
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NXNTSn OCteSO 
OeUFSV 001102 



ONCEE 001 IbM 

OOU^ 007302 

OR = 0C02X 

OU'^ 020032 

XTBUF 024550 



PORT 011112 
PARTST 010520 
PftTST 014514 
PflTTST 015154 
PC =-/.000007 



PCNT 
PGE 

PGTTST 
PGTTW 
PIP s 
PRTP 
PRTPl 
PS = 

PSU : 
PTDOtC 
QE5 
QESOON 



Pivcon 

R«fCl 

RMttJ 

RflNTS 
RDLIN = 
RDOCT : 
RDTST 
RtflTl 

Rrtrra 

RWT3 
RJ«T4 
RSAS 



001004 
002000 
011b7t> 
016b24 
020000 
011300 
011302 
17777b 

17777b 
Q2«24b 
018544 
01b640 
000001 



024312 
024326 
02H%4 
001154 
003714 
104412 
104410 
OOSTbO 
012076 
G122SM 
012364 
012474 
001122 



RS8A niiia 



28041 

17441 

2631 

2908 

3458 

3851 

1673« 

3319* 

2849 

181111 

43251 

1864 

2691« 

3321« 

4720 

32071 

31151 

37881 

38821 

171U 

3708ff 

17351 

18121 

33291 

4113 

18171 

3208 

3219 

16991 

4680ft 

17001 

4864 

41111 

4121 

18691 

22031 

23701 

27991 

34281 

39161 

22% 

49421 

49761 

1B271 

22941 

4556 

46301 

26461 

33711 

34061 

34331 

34571 

17551 

2877 

4670ft 

17511 



18feH* 


1937* 


2424 


2648 


2672 


2692 


2938 


2965 


2999 


3500 


3507 


3524 


3885 


3927 


3955 


1691« 


18311 


1863* 


3323« 


3660 


3663ft 


2889 


28911 




1937 


2295 


2297 


2722 


2735ft 


3055 


3330ft 


3499ft 


3506ft 


4725 


4745ft 


4746 



2610ft 
3929ft 
4329ft 
3358 

41231 

32431 
32441 

1700 



4900 

41271 
19411 
22171 
23821 
28291 
34521 
39481 
49401 
4970 



46311 
4702 



1881 
2934 
4671 
194eft 



2654ft 
4144ft 
4330ft 



1945ft 
4904 



20041 
22241 
23941 
28921 
34861 
40001 



2001 
3106 
4882 
1971 



2698ft 
4192ft 
4341 



2009ft 
4922 



20541 
22371 
24171 
30481 
35741 
41061 



4705 4709 



2442 
3342 



2439 
2716 
3013 
3564 
3966 

4926* 



2311 
3061 
3549 
4816ft 



2745» 
4447ft 



49261 



20751 
22431 

35901 
41291 



2452 
3466« 



GU 
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25D2 


=522 


2537 


2597 


2LD3 

k WWW 


?7?1 
C ' C 1 




?73fe 

t r WW 


2766 

C ■ WW 


Km' ilj *. 


2787 


293b 

W WWW 


2862 

woww 


JUCw 




WW* O 


3301 


Www 1 


3372 


3409 


3434 

W ■ W ■ 






3b75 

WW* W 


W' Uw 


w * • W 


3774 


3S28 

Www w 


3837 

WWW * 


3978 


3984 


4142 


4165 


4190 


4239 


4272 


4682 


1887ft 


1906 


1913* 


1920 


1938* 


3267 


3292 


3316 



2325 
3079 
3747ft 
4817 



2785ft 
4624ft 



2423ft 
3222ft 
3827* 
4e35ft 



2ei0ft 
4927ft 



2455ft 
3261ft 
38S0ft 
4836 



3337ft 
4937* 



2486ft 
3269ft 
3884ft 
4842 



2521ft 
3271ft 
3954ft 
50071 



25%ft 
3274ft 
3965ft 



2647* 
3276ft 
4238ft 



20841 21131 21291 21411 21501 21661 21801 

22491 22561 22661 22731 22811 22891 2342 1 

24801 25111 K491 §901 26411 

31321 31401 31581 32021 ^11 

^: ^: m 



26821 27251 

33241 33661 

37831 3B201 38441 



2474 2505 2518 2540 2583 2872 2874 
3648 3730 3739« 3740 3777 3801 4297 



2677 
3290 
4710ft 



3381ft 3mSft 3440ft 3584ft 3677ft 



4115ft 4139ft 4140 4161ft 4162 M19lt *l252ft 4317ft 4323ft 



21871 
23581 
27751 
34031 
38771 



2876ft 
4313* 



2012ft 2029 2116ft 2117 2120ft 2121 2124« 2125 2134ft 2135 



.lAircec 


-11-OERSA-A 


RSU-RSC3-RSQ4 


OCRSAA.PU CROSS REFERENCE TABLE - 








Ci "O" 








pen? 








Cf BO 








>3UOO 








<9993 








^Q55» 










DC&AD 


nni tea 




CJB9* 


KsoHb, 


nni 1 ^ 


ir DU* 


ponQ* 
couo* 


Dc^e 1 


nni inu 


1 TUPfl 


iTtf » 




9nQn 








XX 


CO ID 






Cr UO 


P7U7 
Cf ~f 








PQ75 








JCDi* 








Kit t» 








<39Ci 






J003 


Jf Uf » 






















TUOO" 


I4n^0 






UtQIK 


~i » 








~f CD' 


ocrciD 


UUXltt 




CJ~3" 


Dcces 


UUliUb 


if 


iOf 9« 


prion 


ClTJw" 






9%1# 










P4R3 
C7?a 






ic9n« 


J9JO 






0099* 


"Wil 








I4(t(i5# 

t009» 


ocreaa 




i/D9> 




n9w3<3 


mil 


if SI* 




ocno 


nni 1 lu 


if 9Cv 


I OMR* 


991Q« 


CCCU" 






cf m 


Cf aw 








J90C» 








moA* 

~iOO» 






~f D9" 


~f Ti" 


n9UD 


UUllCD 


17571 

If 9f V 




K3U9 


nnt 1 ic> 


i f 9a* 




It IR 
tSi iO 


31P5 
aiC9 








3flCi7 

aOOf 






1*777 

~f f r 


~f DC 




nnt t V 


1 f 






nnt i?n 


175m 

4 f W 








CC iw 


2251« 






Cf jC 


C TbW 








3414* 






wf C 


af OU 


RSLA 


00112H 


17561 


3137 


RSffi 


001130 


17581 


1951* 




2284 


2560ft 


RS^RR 


021&50 


lbB7 


%75t 


RSRCG 


023SHH 


4H47 


4e56B 


RSVCPS 


001142 


17631 


4114ft 



HU 
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?m7 

Ci~f 


CaaU 


2335 


238H» 


2386 


2522« 


2537 


2597 » 


2603 


2630 


Pfln7« 

COUf " 




2B83 


29Q8ft 


2938 


3223ft 


3262ft 


3278ft 


3300 


3331ft 


a90~* 


^CRt • 
a9Di* 


3599* 


3675ft 


3706ft 


JtOD« 


^RM» 
a^0~" 


4026* 


4042* 


4066ft 


UCQPH 


U7Pn« 
~f CU* 


4725ft 


4746ft 


4817ft 


i tDO 


pni ift 

CUi i' 


2024 


2063ft 


2064 


Ca9U 


Pie*?* 

Caaa* 


2354 


2426ft 


2427 


PQftI ft 
C9Di* 


C90U 


2599* 


260&ft 


2607 


P7RU» 
Cf on* 


PRno« 


2818 


2821ft 


2845* 


^nun 


aUaf V 


3058 


3081ft 


3082 


aCDC 


3P07 

aC jf 


3313 


3333ft 


3334 


mtP 

a^iC 


3MP3 
aiCa 


3436ft 


3437 


3"39ft 


a9CD* 


35P7 
a9Cr 


3535 


3565ft 


3b66 


af ID 


373fe 
af aO 


3744 


3:^0ft 


3751 


«3090 


3fi5S 

a090 


3874 


3887ft 


3888 


a7f U 


300fl« 

a *9U» 


3991 


4027ft 


4030 


4n71 

tU' i 


~Uf « 


4083ft 


4084 


4086 


~C~a» 


~c >*■ 


4255 


'*285ft 


4290» 


U7PR 
~f CO 


M7P0 

~f CT 


4749ft 


4750 


4820« 


aD9i" 








1958 


lfl70« 
XOf 3" 




1946ft 


1953ft 


2094 


20% 


2099ft 


2100 


2103ft 


C^Ui 


C90C 


2626 


2667 


2702 


3007 


3022 


3067 


3092 


3230 


3fi35« 

aOa9> 


aO lU 


3652 


3656 


3759 


lRfi3# 




38% 


3960ft 


3%8ft 


^DDD 


M713# 

if la" 


4851» 


4852* 


4875 


1077 
i af f 




2035 


2191* 


2192 


?p?l 

CCCi 


CaXD 


2320 


2436 


2468 


COa9* 


Pfii4M# 

CO~ 1" 


2944 


2985 


3177ft 


-3CQC. 
a9aD 


3bOD« 
aOwW" 


^* 


3655 


3674ft 




•Cf * 


4282 


4647ft 


4648 


~OUa« 


MB IP* 


4818ft 


4837ft 


4892 


Ca^D" 


P307« 

Ca7f " 


2408 


2413 


4914 


?t4^ 

C^DC 


P5P9 


2621 


2756 


2846 


1300 
a«307 


3420 


3445 


3468 


3476 


3ona 

«y9Ui9 


303M 


3941 


4305 


4652* 


»• DD 


4701 


4795 


4800 


4804 


1S05 


1809 


1901 


4909 


2228ft 


1050« 


1083 


2014ft 


2041 


CCaC" 


2253 


2430 


2451ft 


2477 




2979 


3043 


3071 


3075 


3417 


3442 


3473 


3529 


3560 


3798 


3870 


3906 


3913 


3931 


3145 


3149 


3186 


4662 


4924 


1989 


2018ft 


2046 


2260ft 


2261 


2575 


2839 


£.9 

Jior 


j17 1 




4677 










4138ft 


4160ft 


4187ft 


4237ft 


4319 
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2389» 


2390 


2424* 


2439 


2456* 


247 i 


2648* 


2671 


2692* 


2715 


2736* 


2765 


?965ft 


2999 


3015 


^A AA 

3033 


3056* 


'^Af A 

3060 


3372ft 


3409* 


3434* 


3458* 


3500* 


3507* 


3748* 


3774 


3828ft 


3837 


3851* 


388£» 


4082* 


4142ft 


41S5* 


11 f AA M 

4190* 


• 1 A AA « 


4271 


4836ft 


4887 










2067ft 


2068 


2071* 


2072 


AAAA m 

2078* 


2079* 


2458* 


2459 


2489* 


All AA 

2490 


'VTAA 

2SlK 


9P91JM 

2524* 


2615 


2650ft 


2651 


2659 


AU M 

2694* 


A^ Al» 

2695 


2861 


2910ft 


2913 


2916 


2951 


A^^ Am 

2%9* 


"IAAAm 

3099ft 


3100 


3225ft 


3226 


AAAT 

32% 


32d4* 


3336ft 


3339 


3357ft 


3%3 


3379* 


3392 


3448 


3465ft 


3479 


All A A 

3483 


3502* 


3503 


3583ft 


3601ft 


3602 


AT 1 1 

3611 


3645 


A^ w 

367b* 


A*V^I 1 

3754 


3756 


3807 


AA fl t 

3811 


3831* 


383c 


AAA « 

3891 


3893 


3910 


AAAAm 

3928* 


3937 


3%1* 


1 1 A A A 

4032 


4036 


4044ft 


Li Aur 

4046 


1 1 All A 

4048 


uAtr9 

4052 


40^ 


4116* 


4124 


4143ft 


4166ft 


4173 


4308 


4314* 


4683ft 


4684 


4686 


4721* 


1 1 A A • 

4821 


4823 


4839ft 


4840 


1 1 A^ A 

4867 


4'5dO 


• A# f M 

l%lft 


2010* 


2017ft 


c019ft 


cUcU 


cUcJ* 


A ■ At 1 

2104 


2107ft 


2108ft 


2109 


2112ft 


2360* 


A^r t 

2761 


2783ft 


27% 


28u5ft 


2814 


CQCC 


3284 


3309 


3347 


3359 


3501ft 


3519ft 


3789ft 


3791 


3814 


3826ft 


3830« 


3849ft 


3972ft 


3995 


42%ft 


4248ft 


4254ft 


4267 


A 1 A^ M 

2195ft 


21% 


2199ft 


2200 


SetRft 


eclU 


Ail AA 

2499 


2534 


25^ft 


2569 


*^ 1 A 

2612 


abb 


3179ft 


3180 


3192 


3280ft 


3380ft 


3386 


3705ft 


3771 


3922ft 


3%4* 


39B3ft 


4inlft 


4716* 


47M7* 


4754* 


4758* 


4767* 


4776ft 


AA^A 

2850 


2856 


2858 


2880 


c9cj 


____ 
c98c 


3532 


3608 


%82 


3689 


3713 


3720 


4653 


4755 


4759 


4764 


4768 


4773 


li AAA 

4809 


4813 


4825 


4832 


II All 9 


4^QC 


A AAA 

2229 


2232* 


2233 


2239* 


AAjjA 

2240 


ccHb* 


Al 1 AA 

2493 


2517* 


2543 


2559* 


C9fC 


cbJb 


30% 


3103 


A « • Am 

3117* 


3122 


3354 


3383 


3605 


JbiD 


%17 


3679 


3692 


3710 


IIP w 

%57* 


4658 


4828 


4871 






2268* 


2269* 


2270 


2275ft 


2276 


2283* 


3790 


3797* 


4675* 


4676 


4919 





4320* 
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•^SN-EC XUHQ 
RSUC 001110 



RSUCB 001150 
RSUCUT 006210 
RSC4DT Mllbfe 
RU = 00000b 
RO =-/.000000 
Rl ='/.000001 

R2 =^000002 



R3 =v.0OCO03 



RH 



=-/^C004 



R5 ='/.00Q005 



SAVBAO 001 lOG 

SAVEE 001 176 

SC = 100000 

I SCOPE = 10H400 



SECT 015474 
SEEC 024100 
SETPflT 014bbb 
SHIFT 024344 
5P ''/JXXXXk 



SRftS 
SRCS2 
5RS8A 
' SRSCSl 
' SRSOA 
SRSOS 
SRSEF 
SRSLfi 
SRShC 
5R0 



021S32 
021&14 
021514 
021b66 
021532 
021550 
0215bC> 
021&04 
02147b 
177572 



I7b2l 

2li§« 

2488« 

2737» 

3078* 

3545 

388b« 

41b4# 

I7bbl 

2b98t 

18321 

17801 

17041 

17051 

39B0* 

17061 

4023* 

4248 

WSbS* 

17071 

3030 

4234 

17081 

2332* 

3%3 

4520 

1709« 

4227* 

4380 

4609* 

17431 

18391 

18091 

1872 

2203 

2370 

2802 

3431 

3919 

39531 

4878 

38251 

49461 

17101 

4936« 

1686 

1685 

1680 

1688 

1681 

1682 

1683 

1684 

1679 

17711 



4113* 

1952* 

2183* 

2496 

2753 

3224* 

3563* 

3923* 

4189* 

2373* 

1893* 

4018 

4334* 

♦674* 

4517 

3210* 

4024* 

4294* 

4571* 

2299* 

3374* 

4244 

2297* 

2333 

4214* 

4531* 

2296* 

4228* 

4381* 

4971* 

4234* 

1944 
2217 
2382 
2832 
3455 
3951 

49051 

4950 
1854* 

46701 
46651 
46421 
46801 
46471 
4652M 
46571 
46621 
46371 
4010 



4672 
4667 
4644 
4685 
4649 
4654 
4659 
4663 
4639 
4022* 



4137* 4159* 4185* 4236* 

m' m imi 

2523* 2531 2557* 2586 

2782* 2806* 2837* 2^6 

3263* 3279* 3332* 3351 

358C* 3598* 3670* 3673* 

3926* 3956* 3959* 5%7* 

4240* 4262 4637* 4638 



4288* 

m 

3373* 
3701* 
3987* 
4681* 



4319* 

mi 

2600 

2941 

3410* 

3704* 

3989* 

4717* 



li^l IhW* i^M §45?* 1%^ 



1^. 

3435* 
3749* 
4025* 
4748* 



3459* 
3768 
4043* 
4819* 



3498* 
3829* 
4067* 
4838* 



3508* 
3840 
4080* 
4897 



3525* 
3852* 
4141* 



1B97* 


1903* 


3495 


3550 


3671 


3702 


3924 


3957 


3973 


3985 


42-^7 


4019 


4020 


4021 


















4516 


4B35* 


4942* 


Li All f H 

4946* 


4951* 


4955* 


4"3ol* 


LtQCI 

4"Jbj 








1877* 


2295* 


2740* 


2741* 


2743* 


2744* 


3213* 


3214* 


3215 


3978* 


3979* 


4527* 


4528* 


4534* 


4553 


4557* 


4568* 


4570* 


4572* 


4574 


4577* 


4964* 


3211 


3212* 


3216 


3218* 


3220* 


3228* 


3244 


324f>* 


3509* 


3510 


351S 


4040* 


4056 


4059 


4064 i 


4065* 


4078* 


4094 


4097 


4215* 


4232* 


4242* 


4299* 


4304 


4518 


4533* 


4554 


4559* 


4561 


4563 


4565* 


4566* 


4567* 


4576* 


4945* 


4948* 


4954* 


4957* 


4959* 


4960* 




2906 


2%1* 


2962 


2300* 


2313* 


2314* 


2327* 


2328* 


2738* 


2744 


2905* 


3375 


3460* 


3461 


3510* 


3511* 


3512 


3515* 


3516* 


3517 


4213* 


4233* 


4250* 


4519 


4532* 


4555 


4558* 


4575* 


4944* 


4949* 


2323 


2325* 


2331 


2303 


2304 


2307 


2309 


2311* 


2317 


2318 


2321 


2336 


2339 


2731* 


2732 


2734* 


2741 


3375* 


3376* 


3377 


3%1* 


3462* 


4219 


4221* 


4232 


4354 


4364* 


4368* 


4382* 


4471 


4474* 


4494 


4500* 


4943* 


4947* 


4952* 


4953* 


4956* 


4958* 


4962* 


4967 


4968 


2739* 


2743 


2302* 


2303* 


2304 


2316* 


2317* 


2318 


2330* 


2331* 


2333 


4229* 


4246 


4355 


4356* 


4357 


4359* 


4360 


4362 


4370 


4378* 


4379* 


4472 


4473* 


4480* 


4482* 


4484* 


4499* 


4521 


4530* 


4590 


4591* 


4592 



4311* 






2007 


2057 


2075 


2224 


2237 


22M3 


2394 


2420 


2448 


2895 


3051 


3113 


3489 


3577 


3593 


4003 


4109 


4132 



4103* 4112* 4134* 



2087 


2113 


2129 


2141 


2150 


2166 


2180 


2249 


2256 


2266 


2273 


2281 


2292 


2345 


2483 


2514 


2552 


2593 


2644 


26S5 


2728 


3135 


3140 


3161 


3205 


3254 


3327 


3369 


3624 


3667 


3698 


3726 


3786 


3823 


3847 


4155 


4181 


4203 


4321 


4328 


46261 


4738 


4157* 


4183* 


4289* 


4315* 


4318* 


4522 


4526^ 



2187 
2358 
2778 
3406 
3880 



4699* 



4688 



4100* 



Jll 
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STRT 

STTEST 0014: 
SUR s 177570 



SURCHG 

SUlO : 

sun : 

SU12 = 

SU13 ' 

SU14 3 

5U15 : 

SU8 = 

sus = 

TINES 

TIHSV 

TKS 

TKSEL 

TKl 

TK2 

TNEOUT 

TPB 

TPS 

TRE = 
TRY 
TRYNX 
TSTAGN 
TSTfCM 
TSTVEC 
TSTI 
T5T10 
TSTIOO 
TSTlOl 
TST102 
TSTi03 
TST104 
TSTIOS 
TST106 
TST107 
TSTll 
TSTUO 
TSTI 11 
1 TSTI 12 
' TST12 
TST13 
' TST14 
. TST15 
TST16 
' TST17 
TST2 
TST20 
TST21 
TST22 
' TST23 
TST24 



022232 
002000 
004000 

020000 
040000 
100000 
0004C0 
XIOOO 
020466 

001170 
022144 
021736 
022112 
022120 
011106 
001020 
001016 
040000 
001330 
001606 
011140 
006716 
017442 
001316 
003022 
015000 
015152 
0153% 
01S472 
015776 
016542 
016640 
016744 
003054 
017062 
017170 

)100 
003162 
003214 
003240 
003322 
003354 



003442 
X3464 
003506 
003622 



1667 

1685 

1701t 

4451 

4732 

4724 

16571 

16561 

16551 

1654t 

16531 

16521 

16601 

16581 

1838 

4211* 

18331 

47161 

1867 

47111 

47121 

3183 

17401 

17381 

1B08I 

1B76I 

1B88 

3211t 

2812t 

4236 

1B72I 

21281 

38471 

38801 

3818t 

38511 

40031 

41081 

41321 

41551 

21411 

41811 

42031 

47381 

21501 

21661 

21B0I 

21871 

2203t 

22171 

18441 

22241 

22371 

22431 

22481 

22561 



16731 






1888t 


1818 




1702 


1884 


1804 


4637 


4642 


4647 


4743 












4331 


4434 




4406 






4332 


4334 




4438 






4385 






4381 






4451 






1840* 


2062* 


2802 


43221 


4410 


44251 


1838« 


2062 


2802« 


46881 






4733 






4734 






31881 








*lof u* 




4366 


4371 




2821 


3357 


42B5 


1680 






1802 


18151 


4325 


3247 






42541 







1824 
4652 



4331 
4657 



4381 
4665 



4383 
4670 



4395 
4675 



4406 
4683 



4434 
4711 



4438 
4714 



4448 
4718 



2803* 3115« 3163 
3115 3163« 3207 



3164* 3207* 4006 4007* 4136* •ttlO 
4006* 4135 4210* 4322 
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TST2S 

TST2fe 

TST27 

TST3 

TST3Q 

TST31 

TST32 

TST33 

TST3t) 

TST37 

TSTM 

TST40 

TST41 

TST42 

TSTH3 

TST44 

TST45 

TST4b 

TST47 

TST5 

TST50 

TST51 

TSTSa 

TST53 

TST54 

TST55 

TST56 

TST57 

TST6 

TSTbO 

TST61 

TSTb2 

TSTba 

TSTb4 

TST65 

TSTbb 

TSTb7 

TST7 

TST70 

TST71 

TST72 

TST73 

TST74 

TST75 

TSTTb 

TST77 

TTACC 

TTHOUT 

TTVEC 

TYPE : 



003S70 
003blb 
003b54 
00224b 
003712 
004132 

m 

004500 
004624 
0024bO 
005004 

881334 
00S5X 
0057Sb 
00bl44 
006332 
006542 
002552 




010220 
01051b 
010574 
010610 
010720 
00260) 
011110 
011332 
011674 
012074 
0122S2 
012362 
012472 
012642 
002740 
013274 
013350 
013464 
013734 
014072 
014216 
014512 
014664 
002250 
007300 
017644 
104402 



22661 
22731 
22811 
20071 
22S2I 
23451 
2358t 
2376l 

24201 
244BI 
20571 
24B3I 



TYPEO s 104404 



25931 

26441 

26851 

272BI 

27781 

20751 

28021 

28321 

28951 

30511 

31131 

31351 

31401 

31611 

20871 

32051 

32541 

33271 

33691 

34061 

34311 

34551 

34891 

21131 

35771 

35931 

36241 

36671 

36981 

37261 

37861 

38231 

20091 

2855 

4288 

1886 

4581 

4789 

4901 

4445 



28901 
42941 

1908 1912 1928 1929 

4601 4604 4608 46271 

4798 4607 4845 4858 

4908 4913 4918 4923 

46281 4860 4863 4868 



3155 
4701 
48bl 


3662 
4704 
4866 


4333 
470B 
4870 


443b 
4741 
4874 


4440 
4752 
4881 


444b 
47b2 
4886 


4498 
4771 
4891 


4538 
4780 
48% 


4872 


4876 


4B83 


4888 


4893 


4898 


4903 


4910 



rWINOEC-U-OERSfl-fl RSn-RS03-R£04 I 
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4915 


4920 


TYPES i 


10HM0e> 


1911 


1927 


UNCMP 


001 1&2 


18301 


1882* 




3731 


3739 


UNITST 


006334 


27301 




UNITSV 


OOllbO 


18291 


1881* 


UNNUM 


00115b 


18281 


1883« 






23b3 


2400 






2994 


3008 






3815 


38b3 


UP = 


000000 


17811 


4018 


UfllTRY 


02425b 


2bl0 


2b54 




3929 


4144 


WC = 


000010 


179bl 


1997 




2568 


2b02 






3842 


42b4 


UCE : 


040000 


18141 




ucEO^c 


011b44 


3277 


33191 


UCEDON 


Ollbbb 


3272 


3323t 


UCETST 


011334 


32b0l 


3322 


UCETT 


011342 


32b2l 


UORK 


001200 


18501 


22bl« 






2575* 


257b» 






3032« 


3033 






34b7» 


3470» 






421b» 


4217 






4%5» 


4%9» 


UORKl 


001202 


1851 i 


29b7» 






471b 




UCRK2 


001204 


18521 


3494* 


URCKT 


00bl4b 


2b90t 




URTLCK 


0222b4 


lb70 


47401 


WRTST 


005532 


25951 




UT 


022204 


4722t 


4727 


UTDV 


017440 


4253t 




UTDVl 


0177b2 


4287 


4312 


HTDV2 


017b42 


4289 


42921 


UTE 


022214 


4719 


47251 


UUP = 


000004 


18351 


3212 


2ER0NE 


004374 


23951 




SENOAO 


020102 


lbb3 


43371 


SENDl 


020112 


4335 


43391 




OSblSO 


Ibbll 


lbb2l 






1929 


19301 






2030 


203b 






2118 


2122 






2212 


2222 






23b7 


2375 






2453 


24b0 






250b 


2509 






^^^^ 

2573 


2578 






2b34 


2637 






2713 


2719 






282b 


2851 






2939 


2942 






301b 


3019 



Lll 
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4925 



4b29l 












1888 


1915* 


1922# 


2442 


2452 


2474 


3777 


3802 










1888 


3b29 


4217 








1890 


1910 


1917* 


1923* 


192b 


1946 


25b4 


2b24 


2bb5 


2700 


2732 


2739 


3023 


30b5 


3090 


3232 


3285 


3307 


3898 


3993 


4219 


4227 


4254 


42b5 


4019 


4020 


4021 












C' OS 




3337 

WWW' 




4192 


49291 










2053 


2157 


21bl 


2165 


218b 


237b 


2620 


2bb4 


2714 


2755 


2888 


2943 


4731 


4894 










ccoc» 






P377* 






2577 


2838« 


2841* 


28b4* 


28b8 


2870* 


3055« 


305b 


3079* 


3080 


3144* 


3147* 


3627* 


3b29 


3b32* 


3b55* 


3975* 


3977* 






4297 




4313 


47Qb* 

■ f WW* 


29b8ft 


2988 


2990 


3188* 


3190* 


4212* 


3497« 


3498 


3525 


4711* 


4732 




43171 












4315 












lbb4l 


IbbbI 


lbb9l 


lb72l 


lb78l 


lb90l 


1959 


19b3 


19b7 


1972 


1978 


IW 


2042 


2047 


2052 


20b5 


20b9 


2073 


212b 


2137 


2148 


215b 


21b0 


21b4 


2230 


2234 


2241 


2247 


2254 


22b4 


2379 


2387 


2391 


2410 


2415 


2428 


24b3 


24bb 


24b9 


2472 


2475 


2478 


2519 


252b 


2529 


2532 


sac 




2581 


2584 


2587 


2b01 


2b04 


2b08 


2b52 


2b57 


2bb0 


2bb3 


2bb9 


2b75 


2748 


2751 


2754 


2757 


27b3 


27b9 


2859 


28b2 


2878 


2881 


2884 


2887 


2945 


2949 


2952 


2977 


2980 


2983 


302b 


3034 


3037 


3041 


3044 


30b3 
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?5fl3 




1961 
2759 
3345 
4703* 


2010 
2812 
3520 
4743* 


2023 
2823 
3539 
4852 


2112 
2864 
3761 


2360 
2927 
3793 


3415 


3440 


3584 


3677 


3708 


H380 
3004 


2435 
3020 


2467 
3038 


2498 
3353 


2533 
3770 



2285* 


2286 


2294* 


2398* 


2404* 


3013* 


3014* 


3015 


3028* 


3029* 


3178* 


3182* 


3213 


3223 


3229* 


3981* 


4117* 


4118* 


4167* 


4168* 


4707* 


4717 


4929* 


4932* 


4933 


4225 


4231* 


4286 


4714* 


4715* 



17311 


1742t 


1866 


1886 


1908 


1990 


1996 


2002 


2021 


2025 


2081 


2091 


2101 


2105 


2110 


2175 


2185 


2193 


2197 


2201 


2271 


2279 


2287 


2351 


2355 


2431 


2434 


2437 


2440 


2443 


2491 


2494 


2497 


2500 


2503 


2541 


2544 


2547 


2567 


2570 


2613 


2616 


2619 


2622 


2628 


2680 


2696 


2704 


2707 


2710 


2790 


2793 


2797 


2816 


2819 


2918 


2921 


2924 


2930 


2936 


2986 


2997 


3000 


3003 


3011 


3069 


3072 


3076 


3088 


3094 
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mi 
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.CLRDK 

.HLT 

.HLTCT 

• ILL'JP 

.KIT 

.OVER 

.POUER 

.POWUP 

.PR 

.PRF 

.PRL 

.PTIT 

.PUVEC 

.OQ. = 

.ROLIN 

.ROOCT 

.SAVRB 

.SCOPE 

.5VLA0 

.SWOPT: 

.TBIT 

.TRAP 

.TRP 

.TYPE 

.TYPEB 

.TYPEO 

.TYPES 



02352& 
020470 
0£0C>24 

0211&4 
02044D 
02C444 
021040 
021104 
021014 
020722 
020700 
020&b0 
021172 
OOOOlb 
021314 
021176 
021170 
020276 
020420 
167400 

020116 
021440 
021456 
020140 
020626 
020636 
02C646 



3097 

3237 

3387 

3480 

3612 

3693 

3769 

3841 

393S 

4269 

44411 

4581 

4756 

4796 

4848 

4892M 

50071 

4632 

1857 

4443* 

4921 

4514 

4396 

4394 

1855 

4523 

4464* 

4476 

44771 

4465 

451Hft 

46131 

4590« 

4551 • 

4522« 

4391 i 

4402 

16451 

4334 

43411 

1859 

4623 

43541 

44641 

4466t 

44681 



3101 

329B 

339C 

34P4 

361b 

3711 

3772 

3859 

3938 

4275 

4446 

4595 

4760 

4798 

4858 

4896 

5008t 

48511 

44341 

44571 

45411 

4405 

44191 

45141 

45261 

4466« 

4479 

4493 

44701 

4515« 

i626 

4631 

4630 

4526 

4626 

4407 

1652 

4391 

4620i 
462Ht 
H627 

4628 
4629 



3104 

33CH 

3393 

3530 

3638 

3714 

3775 

3865 

3942 

4283 

44471 

4601 

4762 

4801 

4861 

4897« 



4856 

4411 

4536 

44&8« 
44841 



4523« 
4627t 



45441 

44131 

1653 

4434 



J107 
3311 


3119 


3x23 


3314 


3340 


3397 


3400 


3418 


3S33 


353b 


3542 


3643 


3b4b 
3721 


3649 


3717 


3734 


3778 


3781 


3795 


3868 


3871 


3875 


3997 


4031 


4047 


4306 


4309 


4333 


4449 


HH57 


LAUCO 

4Hb8 


4612« 


4701 


47021 


4765 


4769 


4771 


4805 


4807 


4810 


48621 


4866 


4870 


4901 


4902« 


4908 



4877 
4418« 



45451 
46S8t 



4421 
1654 
4438 



312b 

3343 

3421 

3547 

3653 

3737 

3799 

3894 

4070 

43341 

4467 

4704 

4774 

4814 

48711 

4909M 



3138 
3349 
3424 
3557 
3657 
3741 
3805 
3901 
4085 
4341 
4487 
4708 
4778 
4826 
4874 
4913 



3155 

3352 

3443 

35b 1 

3bb2 

3745 

3808 

3904 

4125 

4343M 

4490 

4723 

4780 

4829 

4881 

4914« 



317Q 

33S5 

3446 

3537 

3b80 

3752 

3B12 

390? 

4169 

4367 

4495 

4741 

4783 

4833 

4882K 

4918 



3172 

3361 

3449 

3b03 

3b83 

3757 

3818 

3911 

4174 

4372 

45051 

47421 

4787 

4843 

4886 

49191 



3195 
33b4 
3474 

3b0b 

3b8b 

37b3 

3835 

3914 

4196 

«425 

4538 

4752 

4789 

4845 

4887M 

4923 



4879 
4455 



4884 



4469« 4474 4478 4488« 4489 4492« 4494 4498 45051 



46291 46301 46311 46321 46331 



1655 
4451 



1656 



1657 1658 1659 1660 1661 4331 



22^-^ 

323M 

3477 

3bQ9 

3690 

37bb 

3838 

3932 

4263 

4H40 

4542 

47531 

4792 

48461 

4891 

49241 



4889 4894 4899 4905« 4906 4911 4916 



4332 
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Nil 
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END 

LOPOR 

NEWT5T 



ODTll 
OOTllX 
POP 
PRINT 



PUSH 
SCOPE. 



SET 

TYPftOR 

TYPBIT 

TYPCHR 

TYPDEC 

TYPLIN 

TYPOCS 

TYPOCT 

TYPTXT 



JCflTCH 
SCHTflG 
SDONE 
JEQUflT 
JHLT 
SKMflR 
, lOCTfiL 
' SPOUER 
SRAND2 
SRAN04 
SRODEC 
SRDLIN 
SRDOCT 
ISCOPE 
$SET 
SSETUP 
JSffilR 
S5UD0C 
STRAP 
5TYPE 
IT<PEA 
ITYPED 
SJmiR 



II 

17831 
II 

2203 
239M 
3110 
3664 
4735 
II 
II 
II 
II 
4708 
4881 
II 
II 
22171 
24171 

46131 
II 
II 
II 
II 
II 
II 
II 

4919 
II 

4789 

4913 
II 
II 
II 
II 
II 
II 
II 
II 
II 
II 
II 
II 
II 
II 

46131 
II 
II 
II 
II 
II 
II 
II 
II 



16451 

4018 

16451 

2217 

2417 

3132 

3695 



17281 

17281 

4741 

4886 

17281 

18691 

22241 

24451 

31401 

37231 

4626 

17281 

17281 

17281 

17281 

17281 

17281 

4924 

17281 

4798 

4918 

16451 

16451 

16451 

16451 

16451 

16451 
16451 



16451 

16451 

16451 

4626 

16451 

16451 
16451 
16451 



4019 


4020 


4021 








1869 


1941 


2004 


2054 


2075 


2084 


2224 


2237 


2243 


2249 


2256 


2266 


2445 


2480 


2511 


2549 


2590 


2641 


3140 


3158 


3202 


3251 


3324 


3366 


3723 


3783 


3820 


3844 


3877 


3916 



1909 
4444 

1886 
4807 
4923 
1661 
1731 
4326 
1697 
4426 

4458 
4506 



4583 
4546 
4384 
4627 
1854 

1649 
4613 
4344 



2113 
2273 
26B2 
3403 
3948 



4401 


4404 


4499 


4530 


4575 






1886 


1908 


1929 


3155 


3662 


4333 


4440 


4752 


4762 


4771 


4780 


4789 


4798 


4807 


4891 


4896 


4901 


4908 


4913 


4918 


4923 


4398 


4470 


4516 


4553 








19411 


20041 


20541 


20751 


20841 


21131 


21291 


22371 


22431 


22491 


22561 


22661 


22731 


22811 


24801 


25111 


25491 


25901 


26411 


26821 


27251 


31581 


32021 


32511 


33241 


33661 


34031 


34281 


37831 


38201 


38441 


38771 


39161 


3948« 


40001 


4627 


4628 


4629 


4630 


4631 


4632 





?129 
2281 
2725 
3428 
4000 



4446 
4845 



21411 
22891 
27751 
34521 
41061 



2141 
2289 
B775 
3452 
4106 



4538 
4858 



21501 
23421 
27991 
34861 
41291 



2150 
2342 
2799 
3496 
4129 



4560 
4861 



2 '661 
23581 
28291 
35741 
41521 



2166 
2358 
2829 
3574 
4152 



4600 
486b 



21801 
2370it 
28921 
35901 
41781 



2180 
2370 
2892 
3590 
4178 



4701 
4870 



21871 
23821 
30481 
36211 
42001 



2187 
2382 
3048 
3621 
4200 



4704 
4874 



22031 
2?94i 
3'LDl 
36b4l 
47351 



1926 
4859 


4862 


4867 


4871 


4875 


4882 


4887 


4892 


4897 


4902 


4909 


4914 


1908 
4945 


1929 
H858 


3154 
4861 


3662 
4865 


4701 
4869 


4704 
H873 


4708 
4881 


4740 
4886 


4752 
4891 


4762 
4896 


4771 
H901 


4780 
4908 



4628 4629 4630 4631 



"lilies: -::-:£«5SH-i ==.:-'?£:3-«^e:'^ 







M952 


'<954 
4953 


4956 

c< 


HOC 


2673 






4951 


4955 


AS. 


1915 


4946 
2179 
3277 






Bc: 




2215 


3272 


9-:s 




3633 






:8b£> 

2325 


:87S 


1869 


19CQ 


£C30 


2C36 


2042 




2118 
2230 
2311 


2122 


2126 


2137 
2247 




£234 


2241 




2355 


2367 


2375 




2443 


2460 


2463 


2466 




8529 


2532 


2535 


2538 




2&:3 


2616 


2619 
2719 


2622 




2710 


2713 


2748 




2947 


2955 


2857 


2859 




293C 


2936 


2939 


2942 




300G 


30C3 


3011 


3016 






3097 


3101 


3104 




3185 


3195 


3234 


3237 




33H9 


3355 


3361 


3364 




3S74 


3477 


3480 


3484 




361b 


3630 


3638 


3643 




3"37 


j741 


3745 


3752 




3912 


3818 


3835 


3838 




3914 


392S 


3932 


3935 




4125 


4174 


41% 


4218 




43bl 


4392 


4394 


4409 




4769 


4774 


4778 


4783 




4648 


4880 


4885 


4890 


BiT 


4411 


4562 




1913 


BIC 


1673 


1863 


1887 




3150 


3187 


3193 


3323 




4379 


4715 


4905 




BIOS 


4597 






2361 


BIS 


1691 


1903 


1938 


2824 


2915 


2%8 


2974 




3501 


3540 


3641 


3663 




3998 


3960 


3%8 


3994 


5153 
BIT 


-♦491 








1865 


1884 


1886 


1904 




2474 


2490 


25CS 


2518 




3194 


3267 


3292 


3316 




4297 


4331 


4357 


4391 




4889 


4894 


4899 


4906 


BIT 


4564 






3438 




3217 


3335 


3413 


SHE 


1985 


1892 


'8% 


1902 


£951 


3031 


5l70 


3191 




3661 


3672 


3703 


3778 




4358 


4^3 


4369 


4377 




4857 


4678 


4950 


4970 
2H14 


BFL 


2608 


2652 


2696 


3933 


3657 


3892 


3938 




4372 


4449 


459b 


4687 


BP 


1860 


1B94 


1898 


1914 



812 

- cEWNEfiT 5ir*BC^S 



4957 


4959 


4%2 






3014 


3029 


3246 


3302 


3552 


4958 


4960 


4961 






4224 


4302 








1907 


1959 


1963 


1%7 


1972 


2047 


2052 


2065 


2069 


2073 


2148 


2156 


2160 


2164 


2175 


2254 


2264 


2271 


2279 


2267 


2379 


2387 


2391 


2403 


2410 


2469 


2472 


2476 


2491 


2494 


2544 


2547 


2567 


2570 


2573 


2628 


2634 


2637 


2657 


2660 


2751 


2754 


2757 


2763 


2769 


2662 


2869 


2873 


2876 


2881 


2945 


2949 


2952 


2%3 


2977 


3019 


3026 


3034 


3037 


3041 


3107 


3119 


3123 


3126 


3138 


3246 


3268 


3288 


3293 


3<.';a 


3364 


3390 


3393 


3397 


3400 


3530 


3533 


3536 


3542 


3547 


3646 


3649 


3653 


3680 


3683 


3757 


3763 


3766 


3769 


3772 






«90D9 


tsmo 


•sot A 


3942 


3974 


3986 


3992 


3997 


4259 


4263 


4269 


4275 


4280 


4421 


4435 


4487 


4490 


4560 


4787 


4792 


47% 


4801 


4805 


4895 


4900 


H907 


4912 


4917 


2262 




2285 


2332 


2563 


3356 


3376 


3462 


3511 


3516 


2364 


2400 


2565 


2606 


2625 


2995 


3009 


3024 


3066 


3091 


3761 


3789 


3793 


3816 


3826 


4231 


4266 


4713 


4926 




1906 


1920 


1924 


1989 


2024 


2525 




2583 


27% 


2839 


3468 


3629 


3652 


3656 


3660 


4395 


44% 


4434 


4438 


4451 


4911 


4916 


4921 






3522 


3603 


3686 


3854 


3899 


1905 


1921 


1925 


2405 


2453 


3352 


3376 


3387 


3464 


3469 


3958 


3982 


4119 


4169 


4220 


43% 


4407 


H439 


4452 


4479 


2973 


3059 


3083 


3227 


3266 


3963 


3971 


4031 


4033 


4047 


4723 


4730 


4751 


4822 


4824 


1918 


1931 


2310 


2324 


2338 



(732) 


06-OCT 


-76 08:51 




148 




3554 


4273 


4329 


4375 


4376 


4623 


197B 

* J' o 


lQfl4 

» aO ■ 


1990 


A7^0 


3CDP 


cue A 


CUOi 


?Q91 


?Q95 

CU j3 


3101 


2105 


3110 

C A AU 




?i9a 


3197 

Ci ?r 


3301 


2212 


23^ 


CJUi 


C«3UO 


3315 

Cw 13 


2319 


2329 




C t13 


?4?i 


3431 


3434 


3437 


2440 


?497 


C9UU 


3503 

C3UO 


350(i 

C3iM 


P^Q9 


b9bw 




C30i 


3594 

C30 1 


35B7 

C30' 




3fi04 




?(ifi9 


co< 3 


CDOw 


270S 


2707 

b' Ur 




?793 


3797 
C' *» 


COiO 


3819 


bObv 


coo > 


COO' 


3907 


391B 


C^b A 


3934 


?9fifl 


?983 

C #Ow 


C TOO 


3969 


2991 

b^ J A 


2997 




3f¥i3 




3073 


307^ 


3099 


314B 

JA~0 


31^ 

OA3C 


«9AOO 


3173 

«JA' c 


3191 


3183 




3311 


3314 


3317 


3340 


3343 


O 'iO 


34? 1 

w <C1 


3434 


3443 




3449 




3%1 






3fi09 

wOv J 


3613 






371 1 


3714 


3731 

W' Ci 


3734 


'31 '9 


J' Oi 




3799 


3901^ 

wOU3 












3907 


3911 


4(137 


4K3 




4075 


4091 


4096 


~CDJ 


W?S7 

»CO' 




4309 


4313 

Ab 


4335 


~9 *0 


~D03 




475fi 

1' 30 


47UI 






~01 ' 


■ OCD 


4S29 


4933 


4843 


4922 


4934 


4966 










?91 1 

C7i 1 


3933 


39M 


P97n 

b^^ u 


3146 


3732 


3803 


3899 


3972 


4229 


4256 


CDOD 


?7ni 

C' Ui 


37f»0 

C' DU 


3793 


3S05 


2813 

bO A W 


OCJC 


3?flfi 

JCOO 


330fi 


3319 


3346 


3357 

WWW 


3830 


3849 


3855 


3863 


3883 


3890 


cu^o 


CCr U 


3437 
c »c» 


34U3 
c~ c 


3453 

b iWb 


2459 

b ■ w 7 


co^o 


C03U 


C030 


3137 


31fe7 


3171 


37m 


3777 


3991 


4317 


4335 

ibb9 


4296 


4478 


4684 


4718 


4877 


4879 


4884 


4931 
M7Q 


C3i7 


3541 

C3 »* 


3733 


284Q 

bU I U 


2842 

bW *b 


3471 




3513 
0310 


3519 

w3 AO 


3551 


3657 


~CCD 


494§ 


M351 

~C3t 


4379 


4298 

•b *W 


4332 


4493 


4495 


4529 


4599 


4606 


4733 




>J3U^ 




3567 


3717 


3755 


4049 


4070 


4072 


4085 


4067 


4367 


4841 
2340 


2849 


2871 


2869 


3005 


3153 
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CLC 

:lr 



:lrs 



cnPB 

DEC 

£«T 
HALT 

INCB 
J1P 

JSP 



3197 
'41C1 
4573 
4734 
2133 
Idbl 
2S47 



42U 
2362 
19S1 
2094 
2211 
2378 
2S28 
2633 
2768 
2935 
3025 
3180 
3377 
3483 
i.79 



3906 
4198 
47S9 
4S32 
4362 
4707 
1877 
4311 
lc98 
1662 
1879 
4413 
1667 
1932 
22% 
-H44 
19S4 
.S22 

2 IMS 
2229 
2299 
2330 
2412 
251? 
2598 
2691 
27^0 
2BD8 
2932 
2965 



3219 
4146 

1862 
2731 
3628 
4214 
4453 
1895 
2100 
2229 
23% 
2S31 
2656 
2789 
2938 
303C 
3194 
3383 
3512 
3682 
3804 
3910 
4219 
4764 
4847 
4393 

2300 
4366 

1930 
1917 
4418 
1670 
2954 
2610 
4192 
1855 
1926 
2C10 
2078 
2154 
2239 
2302 
2331 
2413 
2521 
2599 
2692 
2741 
2809 
2903 
2%6 



3273 
4172 
4632 

2208 
1875 
2838 
3636 
4238 
4475 
1899 
2104 
2233 
2390 
2537 
2659 
2815 
2941 
3033 
3233 
3386 
3517 
3669 
3807 
3934 
4258 
4768 

4410 

2314 
4949 

4450 
2734 
4488 
1674 
2%4 
2654 
4337 
1856 
1937 
2011 
2093 
2156 
2245 
2303 
2335 
2423 
2522 
2624 
2693 
2743 
2812 
2905 
2967 



3313 
419** 
4639 

3270 
1893 
2844 
3964 
4294 
4477 
1901 
2109 
2240 
2402 
2543 
2668 
2818 
2951 
3036 
3236 
3389 
3529 
3713 
3811 
3941 
4266 
4773 



3553 
4230 
4644 

4222 
1897 
2865 
3980 
4323 
4497 
1958 
2117 
2246 
2409 
2546 
2674 
2825 
2976 
3040 
3243 
3392 
3532 
3720 
3817 
39% 
4274 
4777 



3604 
4235 
4649 

4295 
1923 
3218 
3983 
4468 
4607 
1962 
2121 
2263 
2414 
2566 
2679 
2858 
2979 
3062 
3244 
3399 
3535 
3733 
3834 
4036 
4279 
4762 



4561 4563 4598 



2328 
4%5 

4524 
3179 
4492 
1679 
3046 
2698 
4447 
1857 
1939 
2012 
20% 
2162 
2251 
2306 
2336 
2424 
2523 
2626 
2694 
2744 
2814 
2906 
2969 



2404 
4%9 

4541 
3470 

1680 
3239 
2745 

1858 
1940 
2013 



2170 
2260 
2307 
2348 
2425 
2524 
2630 
2700 
2759 
2821 
2908 
2971 



2841 



4742 
3631 

1681 
3247 
2785 

2^4 
20S9 
2172 
2261 
2311 
2360 
2426 
2557 
2631 
2702 
2761 
2822 
2909 
2975 



3634 
4247 
4654 

4300 
2079 
322C 
4015 
4527 

1%6 
2125 
2278 
2433 
2577 
2703 
2661 
2962 
3068 
3267 
3417 
3541 
3736 
3837 
4052 
4262 
4786 

4605 

2854 



4753 
4168 

1682 
3322 
2810 



3659 
4373 
4659 



3976 
4397 
4663 



3986 
4402 
4667 



4035 
4405 
4672 



4039 
4465 
4677 



4051 
4467 
4668 



4055 
4476 
4724 



i:s9 

4S-4Z 
4727 



2108 


^ 1 Lit 

2146 


2183 




ccS2 




99n£. 


c4U7 


3229 


Jc5Q 


3261 


3274 


xQQ 


93Q 1 


9UC.7 

j'tb7 


J5u5 


4040 


4041 


4U7B 


Lino f 
4UB1 


i_i • nn 
41uU 


4105 


4157 


U9 1 9 

4£lg 


4557 


4745 


4835 


11030 


uouc 
4*545 








1 aoc 
1995 


cOcO 


eu51 


cu64 


cube 


cu7c 


cUoU 


anon 


2136 


cl55 


cl59 


3 1 1.3 

elb3 


3 1 7u 

cl74 


3 1 Q3 

cl9c 


9 1 OL. 

cl4b 


CCUU 


2286 


2304 


c31o 


c333 


99Cn 

cJbU 


99C11 

c354 


cJbb 


397U 

CjTM 


c4jT 


c4bc 


Slice 


31171 

c471 


c477 


3UOC 


3Cn3 

cbUc 


cbUs 


cbou 


CSOD 


cbuu 


3cn9 
coUd 


3C 1 3 
CbiC 




cbcl 


COCf 


cTUb 


c709 


CflB 


CfJC 


37U9 

C^47 


c75u 


cTbo 


37C3 

cTbc 


CD' C 


PflflO 
coou 




CODD 


?917 




C~Cw 


C jC 1 


2968 


2990 


29% 


2999 


3002 


3010 


3015 


3018 


3071 


3087 


3093 


30% 


3100 


3118 


3125 


3151 


3297 


3303 


3310 


3313 


3339 


3348 


3360 


3363 


3420 


3423 


3442 


3445 


3446 


3463 


3476 


3479 


3546 


3556 


3586 


3605 


3606 


3611 


3642 


3645 


3744 


3756 


3762 


3765 


3768 


3774 


3780 


3794 


3840 


3858 


3864 


3667 


3874 


3693 


3900 


3903 


4056 


4074 


4090 


4094 


4123 


4124 


4173 


4195 


4305 


4308 


4376 


4403 


4494 


4592 


4732 


4755 


4791 


4795 


4600 


4604 


4809 


4813 


4825 


4826 



2870 



4763 
4221 

1683 
4121 
3337 

1864 
1947 

i?4^ 

21f' 



2313 
2365 
2455 
2559 
2649 
2716 
2766 
2835 
2912 
2994 



3147 


3169 


3162 


3190 


3981 


4118 


4250 


4772 


4781 


4790 


4799 


4808 


48% 




4226 


4233 


4299 


4437 


4528 


4932 




1684 


1665 


1666 


1687 


1688 


1692 


1867 


4325 


4339 


4455 


4664 


4904 






3381 


3415 


3440 


3584 


3677 


3708 


3929 


1874 


1676 


1681 


1862 


1683 


1890 


1910 


1948 


1949 


1950 


1951 


1952 


1953 


1%1 


2017 


2018 


2019 


2023 


2062 


2063 


2067 


2112 


2116 


2120 


2124 


2132 


2134 


2135 


2191 


2195 


2199 


2207 


2209 


2210 


2219 


2276 


2283 


2284 


2294 


2295 


2297 


2298 


2316 


2317 


2320 


2321 


232S 


2326 


2327 


2384 


2397 


2396 


2399 


2401 


2408 


1^ 


2457 


2458 


2486 


2487 


2488 


2489 


2560 


2561 


2562 


2564 


2575 


25% 


2597 


2650 


2665 


2667 


2671 


2672 


2677 


2678 


2721 


2722 


2735 


2736 


2737 


2738 


2739 


2781 


2782 


2784 


2787 


2786 


2806 


2807 


2836 


2837 


2845 


2853 


2664 


2874 


2376 


2916 


2926 


2927 


2932 


2934 


2%1 


2962 


3007 


3006 


3013 


3022 


3023 


3028 


3054 
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NOP 

fSSET 

ROL 

ROlB 

ROR 

RTI 

RT5 

SEC 

sue 

TRflP 
T5T 



WAIT 
ASCI2 



:css 

3=09 

33?0 

3^98 
3S38 



37C7 
39C2 
3896 
3%fe 
^008 
•+027 
tO% 

4184 

S237 

4271 

43^3 

4414 

4514 

4534 

4591 

46t>2 

4711 

47S8 

4B3S 

4S19 

2232 

4«% 

2341 

1954 

2139 

4571 

4491 

3188 

4281 

4827 

28b6 

3032 

4b23 

1871 

243b 

2844 

3473 

3780 

42B2 

2607 

3527 

H3bb 

42S3 

1897 

4753 

4982 



305b 
3115 
3£08 
32fc4 
3331 
3411 
3498 
3539 
3601 
3729 
3814 
3887 
3%7 
40C8 
40»*2 
4087 
4141 
41BS 
4238 
4272 
4324 
4415 
4515 
4535 
4b08 
4865 
4714 
4767 
4951 
4824 
2348 
4558 
2742 
2088 
2177 
4572 
4483 
4565 
4316 
4837 
3275 
4442 
4626 
1877 
2468 
2848 
3485 

35ZQ 
4277 

2651 

3566 

4371 

4282 

1808 

4763 

4887 



3357 
3117 
321C 
3269 
3332 
3414 
3500 
3544 
3627 
3730 
3815 
38% 
3868 
4013 
4043 
4103 
4142 
4197 
4240 
4285 
4334 
4418 
4516 
4536 
4620 
4666 
4716 
4776 
4BS2 
4840 
2353 
45% 
4061 
4336 
2214 
4847 
4485 
4S66 
4383 
4871 

4621 
4627 
1883 
2483 
2885 
3550 
3813 
4H00 
2685 
3602 
4408 

1830 
4772 
4802 



3060 
3144 
3212 
3278 
3333 
3434 
35C2 
3545 
3635 
3731 
3827 
3897 
3975 
4014 
4044 
4104 
4143 
4188 
4241 
4288 
4354 
4422 
4517 
4537 
4622 
4670 
4717 



4841 
2373 
4603 
4102 

2867 
4848 

4567 
4416 



4628 
2001 
2489 
3043 
3560 
3824 
4420 
2813 
3754 
4486 

3156 
4781 
4808 



3361 
3145 
3213 
3279 
3336 
3435 
3507 
3549 
3640 
3739 
3828 
3922 
3977 
4016 
4058 
4112 
4149 
4189 
4242 
4289 
4355 
4441 
4518 
4551 
4624 
%71 
4720 
4784 
4862 
4842 
2377 

4700 

3271 



4423 



4628 
2028 
2534 
3075 
3615 
3831 
4448 
2872 
3832 
4488 

3663 
4780 
4914 



3065 
3149 
3214 
3291 
3345 
3436 
3508 
3555 
3655 
3747 
3829 
3923 
3978 
4017 
4059 
4113 
4157 
4190 
4243 
4280 
4356 
4444 
4519 
4552 
%37 
4675 
4721 
4803 
"867 
4843 
2385 



3067 
3163 
3220 
3284 
3347 
3439 
3509 
3563 
3670 
3748 
3831 
3926 
3979 
4018 
4C63 
4114 
4159 
4191 
4246 
42% 
4359 
4464 
4520 
4553 
4638 
4676 
4725 
4812 
4871 
4844 
2388 



3078 
3lb4 
3222 
3285 
3359 
3458 
3510 
3564 
3673 
3749 
3850 
3927 
3984 
4019 
4064 
4115 
4160 
4210 
4248 
4M4 
4374 
4471 
4521 
4554 
%42 
4680 
4726 
4816 
4875 
4%3 
3651 



3079 
316b 
3223 
3290 
3372 
3459 
3514 
3565 
3674 
3750 
3851 
3928 
3987 
4020 
4065 
4116 
4161 
4211 
4249 
4313 
4380 
4472 
4522 
4556 
4643 
4681 
4728 
4817 
4882 
4%4 
4364 



30BC 
3177 
3224 
3294 
3373 
3460 
3515 
3580 
3675 
3759 
3852 
3954 
3989 
4021 
4066 
4117 
4162 
4215 
4252 
4314 
4381 
4473 
4523 
4558 
4647 
4682 
4743 
4818 
4887 
4%7 
4365 



3081 

3178 

3225 

3300 

3374 

3461 

3519 

3581 

3676 

3760 

3853 

3955 

3990 

4022 

4067 

41'}4 

4163 

4216 

4254 

4315 

4382 

4474 

4526 

4574 

4648 

4683 

4746 

4819 

4882 

4%B 

4370 



3084 

3186 

3230 

3301 

3375 

3i?>5 

3520 

3582 

3701 

3791 

3861 

3956 

3993 

4023 

4068 

4135 

4164 

4227 

4255 

4317 

4388 

4488 

4530 

4575 

4652 

4688 

4747 

4820 

4887 

4412 



308b 

3188 

3231 

3307 

3379 

3466 

3524 

3583 

3704 

3792 

3862 

3959 

3995 

4024 

4080 

4137 

4165 

4232 

4257 

4318 

4388 

4500 

4531 

4576 

4653 

4703 

4748 

4836 

4802 



3C90 
3192 
3249 
3309 
3380 
3494 
3525 
3598 
3705 
3797 
3884 
3%1 
4006 
4025 
4082 
4138 
4166 
4234 
4265 
4319 
4401 
4501 
4532 
4577 
4657 
4706 
4749 
4837 
4808 



3cC7 

3262 

3321 

3409 

3497 

3526 

3598 

3706 

3801 

3885 

3%5 

4007 

4026 

4083 

4139 

4183 

-•236 

4267 

4322 

4404 

4502 

4533 

4590 

4668 

4710 

4754 

4838 

4814 



4443 4466 4469 



3276 


3632 


4223 


4454 


4503 


4539 


4630 


4631 


4632 


2035 


2041 


2147 


2569 


2572 


2618 


3103 


3106 


3122 


3637 


3648 




3837 


3857 




4728 


4842 




3058 


3082 


3226 


3856 


3888 


3881 


4584 


4686 


4722 


4334 


4M41 


4447 


4788 


4808 


4846 


4818 


4824 





4301 4480 4482 4484 4568 4569 



4578 4610 4853 



4570 



4538 
4858 



2221 
2662 
3215 
3682 
4010 

3282 
3870 
4821 

4582 
4862 



2253 


2308 


2323 


2712 


2753 


2782 


3216 


3342 


3351 


3702 


3710 


3716 


4032 


4048 


4071 


3334 


3412 


3H37 


4030 


40% 


4068 


4823 


4840 


4830 


4602 


4702 


4705 


4867 


4871 


4875 



2339 
2868 
3354 
3740 
4086 

3S03 
4084 



4708 
4882 



2430 
2877 
33% 
3771 
4244 

3521 
4360 



4742 
4887 



.SLkB 

.E^c 



:.EN 



4)12 
H3S3 

SOOT 
1728 

2187 

3051 

4203 
HS93 
1887 
-♦753 
48S2 

m 

2- 



^505 
IbHS 



239M 
3113 
3fe&7 
4331 
%i3 
1909 
47b3 
HB97 
54 



5QQ7 



2M20 
3135 
3698 
4333 
4627 
1930 
4772 
4902 



,IFF 
, IRP 

LIS' 



.fIftCRO 
.f1C«LL 



.NLIST 



3b21 
4200 
4592 
1955 
4fc32 
1652 
4H58 
4398 
1 

?07S 
2181 
225b 
2371 

2S90 
28% 
3255 
3590 
3844 
415b 
4b29 
H790 

4914 

1763 
1 

1645 
2203 
2394 
3110 
3bb4 
4735 
1 

2075 
2181 
22Sb 
2371 
2590 
c8% 
3255 



>39m 

Juo 

3Sb4 
4331 
4bl2 
4332 



3b95 
4332 
4b2b 
4340 



4404 
lbb2 
208H 
2188 



%i3 
1728 
2217 
2417 
3132 
3b95 

IbHS 
207b 
2187 
2257 
2382 
2594 
3048 
3324 



2S4i 
3052 
3328 
3b21 
3877 
4182 
4b31 
4808 
492M 



1889 
2£24 
2445 
3140 
3723 

lbb2 
2084 
2188 
2266 
2383 
2641 
3052 
3328 



5008 



1872 
2224 
2448 
3140 
3726 
4334 
4628 
3156 
4781 
4909 
9 



m ^ 



3723 
4334 
4627 
43% 



1654 1655 



4471 
1728 
2088 
2203 
2^7 

2645 
3110 
3366 
3625 
3881 
4200 
4632 
4846 



1941 
2237 
2480 
3158 
3783 

1728 
2086 
2203 
2267 
2394 
2645 
3110 
3366 
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1944 
2237 
2483 
3161 
3786 
4340 
4629 
3663 
4790 
4914 

3783 
4339 
4628 
4434 

1656 

4499 
1869 
2113 
2204 



2682 
3114 
3370 
3663 
3916 
4204 
4633 
4859 



1869 
2113 
2204 
2273 
2395 
2682 
3114 
3370 



2007 
2243 
2514 
3205 
3823 
43% 
4630 
4334 
4799 
4919 

2243 

m 

3820 
4391 
4629 
4451 



2054 
2249 
2549 
3251 
3844 

1873 
2114 
2217 
2274 
2417 
2686 
3132 
3403 



2057 
2249 
2552 
3254 
3847 
4424 
4631 
4441 
4808 
4924 
2054 
2249 
2549 
3251 
3844 
4424 
4630 
4540 



4530 
1887 
2129 
2218 
2281 
2421 
2725 
3136 
3407 
3668 
3948 
4441 
4705 
4867 



2590 
3324 
3877 

1887 
2129 
2218 
2281 
2421 
2725 
3136 
3407 



2593 
3327 
3880 
4438 
4632 
4447 
4846 



2087 
2266 
2644 
3369 
3919 
4440 
4633 
4539 
4859 



2685 
340b 
3951 
4448 
4738 
4582 
4862 



s 

3916 
4438 
4632 
4613 



^403 
3948 
4447 
4735 
4626 



2129 
2281 
2728 
34.11 
4003 
4456 

4602 
4867 

4000 
4451 



2141 
2292 
2778 
3455 
4109 
4522 

4702 
4871 

2289 
2775 
3452 
4106 
4522 



28C 
34£ 



4705 
4875 

2150 
2342 
2799 
3486 
4129 
4530 



216b 
23S8 

%^ 

4155 
4539 

4709 
4882 

2166 
2358 
2829 
3574 
4152 
4538 



4627 4628 4629 4630 



1657 1658 1659 1660 1661 4341 4416 4420 4425 



2180 
2370 
2895 
3593 
4181 
4540 

4742 
4887 

21 8C 
2370 
2892 
359C 
4178 
4539 

4631 

4457 



4553 
1909 
2130 
2224 
2282 
2445 
2729 
3140 
3428 
3b9S 
3952 
4447 
4709 
4871 



2084 
2266 
2641 
3366 
3916 

1909 
2130 
2224 
2282 
2445 
2729 
3140 
3428 



4575 
1930 
2141 
2225 
2289 
2449 
2775 
3141 
3432 
3699 
4000 
4539 
4735 
4875 



4626 
1941 
2142 
2237 
2293 
2480 
2779 
3156 
3452 
3723 
4004 
4582 
4739 
4882 



1945 


2004 


2008 


2054 


2058 


2150 


2151 


2166 


2167 


2180 


2238 


2243 


2244 


2249 


2250 


2342 


2346 


2358 


2359 


2370 


2484 


2511 


2515 


2549 


2553 


2799 


2803 


2829 


2833 


2892 


3158 


3162 


3202 


3206 


3251 


3456 


3486 


3490 


3574 


3578 


3727 


3783 


3787 


3820 


3824 


4106 


4110 


4129 


4133 


4152 


4602 


4613 


4626 


4627 


4628 


4742 


4753 


4763 


4772 


4781 


4887 


4892 


489^ 


4902 


4909 



2682 
3403 
3948 

1930 
2141 
2225 
2289 
2449 
2775 
3141 
3432 



n 

2725 
3428 
4000 

1941 
2142 
2237 
2293 
2430 
2779 
3156 
3452 



2141 
2289 
2775 
3452 
4106 

1945 
2150 
2238 
2342 
2484 
2799 
3158 
3456 



2150 
2342 
2799 
3486 
4129 

2004 
2151 
2243 
2346 
2511 
2803 
3162 
3486 



2166 
2358 
2829 
3574 
4152 

2008 
2166 
2244 
2358 
2515 
2829 
3202 
3490 



2180 
2370 
2892 
3590 
4178 

2054 
2167 
2249 
2359 
2549 
2833 
3206 
3574 



2187 
2382 
3048 
3621 
4200 

2058 
2180 
2250 
2370 
2553 
2892 
3251 
3578 



F12 
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3S90 


3594 


3b21 


3625 




38S4 


384B 


3877 


3881 




H1S& 


4178 


4X82 


4200 






4630 


4b3l 


4Ei32 




47«0 


4799 


4808 


484& 






4919 


4924 




.PAvkE 


!£>% 


1731 


4384 


442b 


.RE-* 


1 


549 


1097 




.REP' 










.se^L 


1869 


:941 


2004 
2799 


2054 




2725 


2775 


2829 






348b 


3574 


3590 




4lM 


4129 


4152 


4178 




1E>45 









3bb3 


Jbb4 


3b&8 


3b95 


3b99 


3723 


3727 


391b 


3920 


3948 


3952 


4000 


40C4 


41Cb 


4204 


4334 


4441 


4447 


4539 


4582 


4b02 


4b33 


4702 


4705 


4709 


4735 


4739 


4742 


4859 


48b2 


48b7 


4871 


4875 


4882 


4887 


4458 


450b 


454b 


4583 








2084 


2289 


2342 


2417 


2445 


2480 


2511 


2892 


3048 


3110 


3132 


3158 


3202 


3251 


3b21 


3bb4 


3b95 


3723 


3783 
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